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ABSTRACT 


THE FUNCTION OF THE DQ11 DIAGNOSTICS ARE TO 
VERIFY THAT THE OPTION OPERATES ACCORDING 
TO SPECIFICATIONS. 


CURRENTLY THERE ARE SEVEN OFF LINE a ee THAT ARE 
TO BE RUN IN SEQUENCE TO INSURE THAT IF AN 

ERROR SHOULD OCCUR IT WILL BE DETECTED 

AT AN EARLY STAGE AND INSURING THAT 

DIAGNOSIS OF ERROR WILL BE IMMEDIATE TO PROBLEM 


NOTE: ADDITIONAL DIAGNOSTICS MAY BE ADDED IN THE FUTURE. 


THE SEVEN DIAGNOSTICS ARE: 

1. CZDQA CREV] BASIS R/wW TEST #1 

2. CZDQB CREVJ BASIC R/W TEST #2 

3. CZDQC CREV] BASIC NPR AND INTERUPT TEST 

4. CZDQD CREV] RECEIVER TRANSMITTER EXERCISER TEST 

5. CZDQE CREVJ] MISC. RX AND TX TESTS. PLUS SCC TESTS. 
6. CZDQF CREV] CHARACTER DETECT TESTS. 

7. CZDQH CRtEVJ CHARACTER LENGTH AND INTERRUPT TESTS. 
T 
1 


HERE IS ALSO_AN ONLINE TEST TO BE DISCUSED LATER. 
. CZDQ0 CREV] ONLINE TEST. (ITEP OVERLAY) 


AND A PARAMETER INPUT PROGRAM IS AVAILABLE 

1. CZDQG CREV] DQ11 TRIAL PROGRAM (PARAMETER INPUT) 

REQUIREMENTS 

EQUIPMENT 

4 PDP11 FAMILY CPU (WITH MINIMUM 4K MEMORY) -WITH 
WITHOUT A HARDWARE SWITCH REGISTER (LOC. 177570) 

Ase 33 (OR EQUILIVALENT) 

SYNC MODEM (ONLY REQUIRED FOR ONLINE TEST) 

STORAGE 

PROGRAM WILL LOAD AND RUN 

IN 4K OF MEMORY. 

LOCATION 1400 THRU 1600 ARE ESPECIALLY TO 

BE NOTED AND TO BE UNTOUCHED BY OPERATOR 


AFTER DQ11 TRIAL PROGRAM HAS BEEN EXECUTED, 
OR AFTER THE ‘AUTO SIZING’ HAS BEEN DONE. 


LOADING PROCEEDURE 
ME THOD 
ALL PROGRAMS ARE IN ABSOLUTE FORMAT AND 


SEQ 0002 


(ES ES a —E —— — 


F 
| 
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ARE LOADED USING THE ABSOLUTE LOADER. 
ABSOLUTE LOADER STARTING ADDRESS *500 


NN™N 


LOAD THE ADDRESS OF ABS. LOADER (LOC.XXx500) Xe 
THEN START 


STARTING PROCEEDURE 


A. LOAD LOC. 200 ; 
B. SET SWR TO ZERO FOR ‘‘AUTO SIZING*’ OR LEAVE 
LEAVE SWR BIT 7=1 TO USE EXISTING PARAMETERS SET UP 
BY DQ11 TRIAL PROGRAM OR 1 PREVIOUSLY RUN DQi1 DIAGNOSTIC 
THAT USED THE ‘'AUTO SIZING 
***REFER TO SECTION 4.1 FOR SOFTWARE SWITCH REGISTER OPERATION 
AND OPTIONS. **** 
NOTE:THE SOFTWARE SWITCH REGISTER IS LOCATED AT LOC.176 
SOF TWARE DISPLAY REGISTER IS LOCATED AT LOC.174 


C.THEN START 

THE PROGRAM WILL TYPE MAINDEC NAME AND PROGRAM NAME 

IF THIS WAS THE FIRST START UP OF THE PROGRAM) AND ALSO 
THE FOLLOWING: 


"MAP OF DQ11 STATUS"’ 
1400 160010 
1402 + =152300 
1404 160020 
1406 =150310 


THE ABOVE IS ONLY AN EXAMPLE! 

THIS WOULD INDICATE THE STATUS TABLE STARTING AT ADD. 

1400 IN THE PROGRAM. THE STATUS TABLE MUST BE VERIFIED BY THE 
USER IF AUTO SIZING IS DONE. FOR INFORMATION OF STATUS 

TABLE SEE SECTION 8.4 FOR HEiP. 


eweelF THE SOFTWARE SWITCH REGISTER IS SELECTED THEN THE FOLLOWING 
WILL BE TYPED AFTER THE PROGRAM IDENTIFIES ITSELF: 
SWR=XXXXXMK NEW= (REFER TO SECTION 4.1 FOR OPERATOR'S OPTION) **** 
NOTE: IF USING THE SOFTWARE SWITCH REGISTER WHEN A HARDWARE 


SWITCH REGISTER IS AVAILABLE THE “geogrt WILL NOT 
TYPE OUT THE TITLE. 


SEQ 0003 
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THE PROGRAM WILL TYPE ‘R"’ 
AND PROCEED TO RUN THE DIAGNOSTIC 


CONTROL SWITCH SETTINGS 


IF THE DIAGNOSTIC IS RUN ON A CPU WITHOUT A SWITCH 

REGISTER THEN A SOFTWARE SWITCH REGISTER IS USED WHICH ALLOWS 
THE USER THE SAME SWITCH OPTIONS AS THE HARDWARE SWITCH REGISTER. 
IF THE HARDWARE SWITCH REGISTER DOES NOT EXIST OR IF ONE DOES 
AND IT CONTAINS ALL ONES (177777) THEN THE SOFTWARE SWITCH 
REGISTER (LOC. 176) IS USED. 


CONTROL : 


THIS PROGRAM ALSO SUPPORTS THE DYNAMIC LOADING OF THE SOFTWARE SWITCH 
REGISTER (LOC. 176) FROM THE TTY. THIS CAN BE ACCOMPLISHED BY 
DOING THE FOLLOWING: 


1) 


2) 


3 


~ 


TYPE CONTROL G <*G>; THIS WILL ALLOW THE TTY TO ENTER DATA INTO 
LOC. 176 AT SELECTED POINTS WITHIN THE PROGRAM. 


THE MACHINE WILL THEN TYPE: SWR=XXXXXXNEW= (XXX IS THE OCTAL CONTENTS 
OF THE SOFTWARE SWITCH REGISTER.) 


AFTER THE ‘‘NEW="" HAS BEEN TYPED THEN THE OPERATOR CAN DO ONE 
OF THE FOLLOWING AT THE TTY: 


A) TYPE A NUMBER TO BE LOADED INTO LOC. 176 FOLLOWED BY A <CR>. 
(ONLY NUMBERS BETWEEN 0-7 WILL BE ACCEPTED AND ONLY 6 NUMBERS 
WILL BE ALLOWED) 
IF A <CR> IS THE FIRST KEY DEPRESSED THE SOFTWARE SWITCH 
REGISTER CONTENTS WILL NOT BE CHANGED. 


B) IF A CONTROL U <*U> IS DEPRESSED THEN THE PROGRAM WILL SEND YOU 
BACK TO STEP 2. 
15 SET: HALT ON ERROR 
14 SET: LOOP ON CURRENT TEST 
13 SET: INHIBIT ERROR PRINT OUT 
12 SET: INHIBIT TYPE OUT/BELL ON ERROR. 
11 SET: INHIBIT ITERATIONS 
10 SET: ESCAPE TO NEXT TEST 
09 SET: LOOP WITH CURRENT DATA 
08 SET: CATCH ERROR AND LOOP ON IT 
Hh USE PREVIOUS STATUS TABLE. CLR=DO AUTO SIZE. 
0S SET: 
04 SET 
03 SET 


02 SET: LOCK ON SELECTED TEST 
01 SET: RESTART PROGRAM AT SELECTED TEST 
00 SET: RESELECT DQ11'S DESIRED ACTIVE. 


SEQ 0004 


-—--—--- 
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6.1.2 SWITCH REGISTER RESTRICTIONS 


Sw 00 RESELECT es a oo. ict -eigs 
PLEASE NOTE T A MESSAGE IS T 


BE SET IN LOC “DOACTV'". USING THIS 


IF FOUR DQ11S ARE IN THE SYSTEM: 
a**DQ NOT®** SET SWITCHS GREATER THAN 
Sw 03 IN THE UP POSITION. THIS WOULD BE 
A FATAL ERROR. DO NOT SELECT MORE ACTIVE 
DQ11S THAN HAS BEEN GIVEN INFORMATION | 
ABOUT IN TRIAL PROGRAM. 

ME THOD : LOAD ADDRESS 200 
START WITH SW OO=1 

PROGRAM WILL TYPE MESSAGE 

CONTINUE THE BINARY NUMBER OF DO11S DESIRED ACTIVE 

EXAMPLF: 1=1 DQ11; 3=2 DQ11; 7=3 DQ11; 17=4 DQ11 37=5 DQ11 ETC. 

NUMBER (IF VALID) WILL BE IN DATA LIGHTS (EXCLUDING 11/05, 1904 , 11/34) 


am OVOW>?Y 


CONTINUE WITH ANY OTHER SWITCH SETTINGS DESIRED. 


Sw 01 IT IS STRONGLY SUGGESTED THAT 
AT LEAST ONE PASS HAS BEEN MADE 
BEFORE TRYING TO SELECT A TEST 
THAT IS NOT IN THE ORDER OF SEQUENCE 
THE REASON BEING IS_ THAT THE 
PROGRAM HAS TO CLEAR AREAS AND SET 
UP PARAMETERS. ALSO WHEN A TEST IS 
SELECTED ALWAYS START AT THE VERY 
BEGINNING OF THAT TEST. 


Sw 09 LOOP ON CURRENT DATA: 
THIS SWITCH WILL ONLY WORK IF 
CALL *‘SCOP1'’ IS_IN THAT TEST. 
THE REASON BEING THAT MOST TESTS 
DEAL WiTH BLOCKS OF DIFFERENT DATA 
TO BE SENT OR RECEIVED ALL AT ONCE 
THUS IN BLOCK DATA; ONE PATTERN CANN'T BE SINGLED OUT. 


4.1.3. SWITCH REGISTER PRIORITYS 
ERROR SWITCHES 
te SW 12 DELETE PRINT OUT/BELL ON ERROR. 
2. Sw 13 DELETE ERROR PRINTOUT. 


3. SW 15 HALT ON THE ERROR. 
Sw 08 GOTO BEGINNING OF THE TEST 


| 
| 
a & ‘ 
5. Sw 10 GOTO NEXT TEST ON ERROR. 
s*eeHiT (ERROR) ROUTINE SUPPORTS <*G> OPERATION*®** 
| SCOPE SwITCHES 
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1. Sw 09 (IF ENABLED By ‘'SCOP1"’) | 
; Sw 14 | 

Se Sw 11 


eeeeSCOPE ROUTINE WILL SUPPORT <*G> OPERATION**** | 
STARTING ADDRESS | 
STARTING ADDRESS IS AT 000200 | 
THERE ARE NO OTHER STARTING ADDRESSES 
FOR THE DQ11 DIAGNOSTICS PREVIOUSLY MENTIONED 
NOTE: IF ADDRESS 000042 IS NON-ZERO 

THE PROGRAM ASSUMES IT IS UNDER | 

ACT11 OR DDP CONTROL AND WILL ACT ACCORDINGLY 

AFTER *ALL* AVAILABLE DQ11°S ARE TESTED 

THE PROGRAM WILL RETURN TO 'DDP2"’ OR ‘‘ACT=11"'. 
OPERATING PROCEDURE 


WHEN PROGRAM IS INITIALLY STARTED MESSAGES AS DESCRIBED IN SECTION 
FOUR WILL BE PRINTED. 


AND PROGRAM WILL BEGIN RUNNING THE 
DIAGNOSTIC 


PROGRAM AND/OR OPERATOR ACTION 
THE TYPICAL APPROACH SHOULD BE 


1. HALT ON ERROR (VIA Sw 15=1) 
WHEN EVER AN ERROR OCCURS 
e. CLEAR Sw 15 
Je SET Sw 14: (LOOP ON THIS TEST) 
4. SET Sw 13: (INHIBIT ERROR PRINT OUT) 


THE TEST NUMBER AND PC WILL BE TYPED OUT AND 

POSSIBILY AN ERROR MESSAGE (THIS DEPENDS ON THE TEST) 

TO GIVE THE OPERATOR AN IDEA AS TO THE SOURCE OF THE 

PROBLEM. IF IT IS NECESSARY TO KNOW MORE INFORMATION +e 
CONCERNING THE ERROR REPORT; LOOK IN a LISTING 


CAN BE INTERPEDITED 
ERRORS 


AS DESCRIBED PREVIOUSLY THERE WILL ALWAY BE 

A TEST NUMBER AND PC TYPED OUT AT THE TIME OF AN 

ERROR (PROVIDING SW 13=0 AND SW 12=0). IN MOST CASES ADDITIONAL 
INFORMATION WILL BE SUPPLIED THE THE ERROR MESSAGE 

ah IS TO GIVE THE OPERATOR AN INDICATION OF THE 


ERROR RECOVERY 
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IF FOR SOME REASON THE DQi1 SHOULD 

“HANG THE BUS’ (GAIN CONTROL OF BUS SO THAT 

CONSOLE MANUAL FUNCTIONS ARE INHIBITED) AN INIT 

OR POWER DOWN/UP IS NECESSARY FOR OPERATOR 

TO REGAIN CONTROL OF CPU. 

IF THIS SHOULD HAPPEN; LOOK IN LOCATION 

“'TSTNO’’ (ADDRESS 1226)FOR THE NUMBER OF THE TEST THAT 
ee AT THE TIME OF THE CATASTROPHIC 

IN THIS WAY THE OPERATOR WILL HAVE AN IDEA AS [0 

WHAT THE DQ11 WAS DOING AT THE TIME OF THE ERROR. 


****HALT RECOVERY WHEN USING SOFTWARE SWITCH REGISTER**** 


IF THE SOFTWARE SWITCH REGISTER IS TO BE CHANGED AFTER A HALT 

THE THE OPERATOR IS REQUIRED TO TYPE A <*G> BEFORE DEPRESSING CONTINUE. 
THE FOLLOWING WILL BE TYPED: 

SWR=XXXXXX NEW= (REFER TO SECTION 4.1 FOR OPERATOR OPTION) 


RESTRICTIONS 

STARTING RESTRICTIONS 

SEE SECTION 4. (PLEASE) 
OPERATING RESTRICTIONS 


DQ11 TRIAL PROGRAM MUST BE RUN PRIOR TO THE 

FIRST AND ONLY THE FIRST RUNNING OF ANY DQ117 DIAGNOSTIC 
NOTE: IF NO PROGRAM OTHER THAN A 

DQ11 DIAGNOSTIC WAS LOADED AFTER DQ11 TRIAL OR 

IF CORE MEMORY HAS NOT BEEN CHANGED;OR IF THERE 

IS NO DQ11 CONFIGURATION CHANGES; THE 

DQ11 TRIAL PROGRAM NEED NEVER BE RUN AGAIN. 

HOWEVER IF ANY OF THE ABOVE HAVE BEEN VIOLATED 

THE DQ11 TRIAL PROGRAM MUST BE RUN AGAIN 

BEFORE RUNNING THE DIAGNOSTICS 

NOTE: AN ALTERNATIVE TO THE ABOVE IS ATTEMPTING 

on ee  acateel WHEN PROGRAM IS INITIALLY STARTED 
w =U. 


MISCELLANEOUS 

EXECUTION TIME 

PASS COMPLETE 

wHEN THE DIAGNOSTIC HAS COMPLETED 

A PASS THE FOLLOWING IS AN EXAMPLE 

OF THE PRINT OUT TO BE EXPECTED. 

END PASS AC-8626F-MC CSR: 160000 VEC: 300 PASSES: 000001 ERRORS: 000000 


NCTE: THE NUMBERS FOR CSR AND VEC ARE. 
NOT NECESSARILY THE VALUES FOR THE DEVICE 


SEQ 0007 


ee 
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THEY ARE ONLY FOR THIS EXAMPLE. 
TST1 (MINI MON] TOR) 


THE VERY FIRST ‘TEST’ (TST1) 

IS *NOT* A TEST OF THE DQ11 HARDWAR 

IT IS A MINI=MONITOR USED TO CYCLE bot IN THE 
SYSTEM THROUGH 


KEY LOCATIONS 
RETURN (1214) 


NEXT (1216) 
TSTNO (1226) 
RUN (1304) 


DQCROO=DOCR17 
DQSTOO=DaQST17 
(1400)=(1476) 


D@ACTV (1500) 


DQ@CSR (1506) 
DOSTAT (1510) 


o---- 
CSO—NWWRU 





THE DIAGNOSTIC. 


CONTAINS THE ADDRESS WHERE PROGRAM WILL 


RETURN WHEN ITERATION COUNT IS REACHED ? 


OR IF LOOP ON TEST JIS ASSERTED. 

CONTAINS THE ADDRESS OF THE NEXT TEST & 
TO BE PEFORMED. ‘ 
CONTAINS THE NUMBER OF THE TEST NOW 

BEING PEFORMED. 

THE BIT IN ‘RUN’’ ALWAYS POINTS ONE 

PAST THE DQ11 CURRENTLY BEING TESTED. 


EXAMPLE : 

(RUN) 1304/0000000001000000 

MEANS THAT DQ11 NO.05 IS THE DQ11 NOW 
RUNNING. 


wa Y 


THESE LOCATIONS CONTAIN THE INFORMATION 
NEEDED TO TEST UP TO 16 (DECIMAL) DQ11S 
SEQUENTIALY. THEY CONTAIN THE CSR,VECTOR 
AND STATUS CONCERNING THE CONFIGURATION 
OF EACH DQ11. 

EACH BIT SET IN THIS LOCATION INDICATES 
age hy ASSOCIATED DQ11 WILL BE TESTED 

N. 


EXAMPLE : 

(DQACTV) 1500/9000000000011111 
MEANS THAT DQ11 NO. 00,01,02,03,04 
ee TESTED. 


EX E: 

(DQACTV) 1500/0000000000010001 
MEANS THAT DQ11 NO. 00,04 

WILL BE TESTED 

CONTAINS THE RECEIVER CSR OF THE 
CURRENT DQ11 UNDER TEST 

CONTAINS “< STATUS OF THE CURRENT 


DQ11 UNDER TEST 
SET: TWO SYNC CHARS/ONE SYNC CHAR 
SET: TEST JUMPER INSTALLED/NOT INSTALLED 


SET: BB OPTION INSTALLED/NOT INSTALLED 

SET: BA OPTION INSTALLED/NOT INSTALLED 

SET: ACTIVE ON FIRST NON-SYNC/ACTIVE AFTER NO. OF SYNC 
SET: AB OPTION INSTALLED/NOT INSTALLED 

SET: ODD VRC/EVEN VRC 


SEQ 0008 
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8.5 
8.5.1 


8.5.2 


8.5.3 


8.5.4 


8.5.5 _ 


8.5.6 


8.5.7 


05=MAY=81 09:27 
BIT 00-08 VECTOR *‘A’’ OF DEVICE 
#** METHOD OF AUTO SIZING *** 
FINDING THE CONTROL STATUS REGISTER. 
WHEN LOOKING FOR THE CSR IT IS NECESSARY TO TAKE CARE 


THAT WHEN A CSR IS FOUND THAT IT iS INDEED A DQ11. THAT 


IS THE METHOD OF MY MADNESS FOR THIS ROUTINE. 
AN ATTEMPT TO CLEAR THE MISC. REGISTER IS ng 34 
IF A TIME-OUT TRAP OCCURES POINTERS ARE UPDA 


ATED 
AND ATTEMPTED AGAIN. IF NO TIME=OUT; THE RECEIVER ‘'ACTIVE BIT’’ (BIT 12) 


IS SET AND A *COMPARE* FOR BOTH SYNC1 AND SYNC 2 IS DONE 


AT THE MISC. REGISTER. IF THEY ARE THERE THIS IS 
A DQ11. THE INFORMATION IS STORED AWAY. 


ONE SYNC BIT OR TWO? 


SINCE TOO MUCH HARDWARE MUST BE TURNED ON TO SENSE THE 


PRESENTS OF ONE SYNC OR TWO. THE PROGRAM ASSUMES 

BY ALTERING BIT 15 IN APPRIOATE DQSTXX: LOCATION. 
"'BB'’ OPTION INSTALLED? 

TO SENSE FOR THE ‘BB'* OPTION THE PROGRAM SELECTS THE 
CHARACTER DET. REGISTER AND THE LOADS IN ALL 1'S; IF 
ANY ONE OR COMBINATION OF BITS ARE SET THE BB OPTION 
IS ASSUMED TO EXIST. 

*"AB'’ OPTION INSTALLED? 


TC SENSE FOR THE *‘AB’’ OPTION THE ite a SELECTS ap 
POLYNOMIAL REGISTER AND WRITES ALL 1°S INTO IT; IF AN 


TwO SYNC 
CHARS. NOTE: THIS ASSUMPTION MAY BE ALTERED AFTER AUTO SIZING 


ONE OR COMBINATION OF BITS ARE SET THE AB OPTION IS ASSUMED 


TO EXIST. 
‘BA’ OPTION INSTALLED? 


TO SENSE FOR 'BA‘' OPTION REQUEST TO SEND AND DATA TERMINAL 
READY ARE SET; IF EITHER ONE OR BOTH ARE SET THE PROGRAM 


ASSUMES THE BA OPTION EXISTES 
JUMPER ON END OF CABLE? ***NOTE:CZDQE ONLY*** 
THE PROGRAM CHECKS TO SEE IF EITHER OR BOTH CLEAR TO 


SEND AND CARRIER ARE SET; IF SO THE PROGRAM ASSUMES THE 


TEST JUMPER IS ON THE END OF THE CABLE. 
ACTIVE ON FIRST NON-SYNC? 


SINCE TOO MUCH HARDWARE MUST BE TURNED ON TO SENSE FOR 


WHEN THE DQ11 GOES ACTIVE THE PROGRAM ASSUMES “‘ACTIVE 


ON FIRST NON=SYNC*'. NOTE: THIS CAN BE CHANGED BY ALTERING 


BIT 11 JN THE APPRIOATE DQSTXX: AFTER AUTO SIZING 


SEQ 0009 
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8.5.8 SET FOR ODD OR EVEN PARITY? 


8.5.9- 


10. 


SENSE WHICH PARITY 
DD PARITY. 


| 
AS ABOVE TOO MUCH HARDWARE IS NEED TO | 
IT 9 IN APPRIO= | 


WAS SELECTED.SO THE PROGRAM ASSEMES 0} 
NOTE: THIS CAN BE CHANGED BY ALTERING B 
ATE DQSTXX: LOCATION. AFTER AUTO SIZING 


FINDING THE VECTOR. 
THE PROGRAM SETS "PRIMARY DONE'’."‘SECONDAY DONE*’, AND “‘INTERUPT ENABLE"’ 
AND LOOKS FOR AN INTERUPT. IF IT INTERUPTS IT IS PICKED 
UP AND STORED AWAY. IF NO INTERUPT OCCURES THE PROGRAM 
ASSUMES VECTOR =300. THIS PROBLEM WILL BE FIXED IN ONE 


OF THE DIAGNOSTICS AND *AUTO SIZING* SHOULD BE REDONE TO 
GET THE CORRECT VECTOR. 


PROGRAM DESCRIPTION 
CONTAINED WITHIN LISTING 
LISTING 

FOLLOWING 


L 1 
14:18 PAGE 12 / 
INTRODUCTION TO DQ11 DIAGNOSCTIC f 


C 
C 


7DQF = MACY11 anes © 


05-MAY-81 
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SEQ OOT1 










:CZDOFFO/<377>/SEQ REG TSTS 
‘COPYRIGHT 1975, DIGITAL EQUIPMENT CORP., MAYNARD, MASS/ 01754 


sREVISED ie pete, BY R. BLACK 
A) SUPPORTS SOFTWARE SWITCH REGISTER 
8) SUPPORTS THE DYNAMIC LOADING OF THE S 


<“G@>. 
/STARTING” PROCEDURE 
[LOAD PROGRAM 
;LOAD ADDRESS 000200 
SPRESS START 
[PROGRAM WILL TYPE att to tentcad EQ REG TSTS*’ 
IND THAT TESTING HAS STARTED 


TAT THE END OF A PASS, SOSA ILL TYPE PASS COMPLETE MESSAGE 
SAND THEN RESUME TESTING 


; WARE SWITCH REGISTER 


SWITCH REGISTER OPTIONS 





100000 Sw15=100000 3=1,HALT ON ERROR 
040000 SwW14=40000 3=1,LOOP ON CURRENT TEST 
020000 Sw13=20000 7=1, INHIBIT ERROR TYPEOUT 
010000 Sw12=10000 3=7,DELETE TYPEOUT/BELL ON ERROR. 
004000 Sw11=4000 3=1, INHIBIT ITERATIONS 
002000 $w10=2000 7=1,ESCAPE TO NEXT TEST ON ERROR 
001000 Sw09=1000 3=1,LOOP WITH CURRENT DATA 
000400 SwO08=400 3=1,L0O0P ON ERROR 
000100 Sw06=100 
00004 Sw05=40 
000020 $w04=20 
000010 Sw03=10 
SWO2=4 ;LOCK ON TEST SELECT 
000002 SwO1=2 TRESTART PROGRAM AT SELECTED TEST 
1 SwO0=1 TRESELECT DQ11 DESIRED ACTIVE 


NOTE: THIS MUST NOT EXCEED ORIGINAL COUNT 


C 
C 


Z7DQF 


MACY11 30(1046) 


ZDOFF P11 OS=MAY=81 





OS=MAY-81 
09:27 


ym 1 
14:18 PAGE 13 
GENERAL DEF INATIONS AND EQUIVALENCIES 


REGISTER DEFINITIONS 


RO=%0 GENERAL REGISTER 

R1=%1 GENERAL REGISTER 

R2=%2 GENERAL REGISTER 

R3=%5 GENERAL REGISTER 

R4=%4 TGENERAL REGISTER 

R5=%5 GENERAL REGISTER 

SP=%6 PROCESSOR STACK POINTER 
PC=%7 PROGRAM COUNTER 


LOCATION EQUIVALENCIES 


DSWR= 177570 ;HARDWARE SWITCH REGISTER LOC. 
DLIGHTS=177570 :HARDWARE DISPLAY REGISTER LOC. 
PS=177776 PROCESSOR STATUS WORD 
STACK=1200 START OF PROCESSOR STACK 


z INSTRUCTION DEFINITIONS 


PUSH1 SP=5746 zDECREMENT PROCESSOR STACK 1 WORD “ 
POP1SP=5726 ; INCREMENT PROCESSOR STACK 1 WORD 
PUSHRO=10046 [SAVE RO ON STACK 

POPRO=12600 TRESTORE RO FROM STACK 
PUSH2SP=24646  ;DECREMENT STACK TWICE 

POP2SP=22626 z INCREMENT STACK TWICE 

-EQUIV EMT,HLT ;BASIC DEFINITION OF ERROR CALL 


B1T15=100000 
B1T14=40000 
BIT13=2 
BIT12=10000 
B1T11=4000 
B1T10=2000 
B1T9=1000 


OWS 
—MmfL—r 


;DQ11 OPTIONAL DEFINITIONS 


ABBIT=2000 
ACTBIT=4000 
0000 


JUMB i T= 40000 


SEQ 0012 


—s 
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614 001000 
615 100000 
616 
617 
618 
619 
620 000000 
621 000001 
622 000002 
623 000003 
624 000004 
625 000005 
626 000006 
627 000007 
628 
629 000010 
630 000011 
631 000012 
632 000013 
633 000014 
634 000015 
635 000016 
636 000017 
637 
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N 1 


GENERAL DEF INATIONS AND EQUIVALENCIES 


ODDBIT=1000 
SYNBIT=100000 


3;DQ11 SECONDARY 


oO 


MISC.= 


=—MNn-— NOW Ss Ww 


RX.BCC 
POLY.= 


wn 
mn 
oO 
" 
—_ 
—nnekieen 
an WW 


Noo 


REGISTER DEF JNATIONS 


RECEIVER BUS ADDRESS PRIMARY. 
RECEIVER WORD COUNT PRIMARY. 

; TRANSMITTER BUS ADDRESS PRIMARY. 
; TRANSMITTER BUS ADDRESS PRIMARY. 
RECEIVER BUS ADDRESS SECONDARY. 
RECEIVER WORD COUNT SECONDARY. 


; TRANSMITTER BUS ADDRESS SECONDARY. 


TRANSMITTER WORD COUNT SECONDARY. 


; CHARACTER _ REGISTER. 
ZSYNC REGIS 
‘MISCELLANEOUS "REGISTER. 

; TRANSMITTER MUX REGISTER. 
TSEQUENCE REGISTER. 
RECEIVER BCC REGISTER. 

; TRANSMITTER BCC REGISTER. 
;POLYNOMIAL REGISTER. 


SEQ 0013 


eshte Se ae 
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DADA AA AAA 
[OO OONAUSWN-O 


MACY11 30(1046) 
OS-MAY=81 


000056 


010120 


000200 
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000004 
001000 
000146 
001500 
001244 
177776 


000340 


000300 


000007 
000142 


000020 
001244 


177776 


Dey ggedte ng SWITCH REGISTER**** 
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TRAPCATCHER FOR UNEXPECTED INTERUPTS 


; TRAPCATCAER FOR ILLEGAL INTERRUPTS 
STANDARD INTERRUPT VECTORS 


ePFAIL 
340 


-HLT 


340 
. TRPSRV 
340 


LOGICAL 


NEW PS. 
EXECUTED, 
VE CMAP: 
1$: MOV 
MOV 
CMP 
CMP 
BLOS 
MOV 
MOV 
2$: ROR 
BCC 
CLR 
TST 
MOV 
INCB 
BNE 
MOVB 
3$: TST 
BR 
4$: BIS 
BIC 
CMP 
MOV 
RTI 
5$: RTS 
DISPREG: 
SWREG: 


-WORD Q 
THIS ROUTINE TRIES TO FORCE THE RECEIVER TO_INTERUPT 
TO ITS VECTOR WHERE IT WILL PICK UP THE STATUS LOCATION 
FOR ITS NEW PC; AND PICK UP AN IOT INSTRUCTION FOR 
WHEN THE NEW PC IS FETCHED AN IOT INSTRUCTION IS 
TRAPPING TO LOCATION 20 WHERE A ROUTINE IS EXECUTED 
brie THE RC FROM THE STACK AND US IT AS THE VECTOR ADDRESS 


PROGRAM START 


-=200 


B 2 
SEQ 0014 


;POWER FAIL HANDLER 

SERVICE AT LEVEL 7 

[ERROR HANDLER 

SERVICE AT LEVEL 

:GENERAL HANDLER D{SPATCH SERVICE 
SSERVICE AT LEVEL 7 


;ACT HOOKS 


ITS 


R1,(RO)+ START FILLING fas VECTOR AREA 
#4,(R1)+ [WITH .+2; IOT 

(RO)+,(R1)+ UPDATE THE POINTER S 

R1,41000 4h ALL FLOATING VECTOR AREA DONE 
1$ BR IF NOT ALL DONE 


“SET FOR IOT TRAP BY DQ11 
TGET THE ACTIVE DQ11 S 


#4$ ,a#20 
DOQACTV, TEMP1 
TEMP 1 TARE YOU ACTIVE.. DQ11 


os ‘df ean PS CLEAR.. NO MORE DQ11S 
(R2)+ [PUT POINTER TO STATUS ge 
#340 ,a-2(R2) TRY AND SET PRI/SEC DONE AND IE 
Ro, :DELAY ccecvces 
#300, (R2) :NO_INTERUPT ASSUME 300 FIX IN TEST C 
(R2)+ [UPDATE POINTERS 
2$ ;GO DO IT AGAIN 
(SP) , (R2) ZENTERD BY IOT TRAP BY DQ11 
#7,(R2) ;CLEAR UNWANTED BITS 
(SP)+,(SP)+ [POP IOT JUNK OFF STACK 
#3$, (SP) TSET RETURN PC ON STACK 

:GO HOME. 
PC TALL SIZING IS DONE 


8 SOFTWARE DISPLAY R 


EGISTER 
SOFTWARE SWITCH REGISTER 


IS 
ST 


| C 2 
C7D0F MACY11 30(1046) O5=-MAY=-81 14:18 PAGE 16 


CZDQFF.P11 O5=MAY-81 09:27 ROUTINES USED FOR AUTO SIZING. SEQ 0015 
7&4 000200 000137 001512 JMP . START :GO TO START OF PROGRAM 
697 000220 .=220 
698 000220 012702 001400 CSRMAP: MOV #1400,R2 ;CLEAR ALL STATUS TABLE 
699 000224 005022 CLR (R2)+ *DO CLEAR 
700 000226 022702 001512 CMP #1512,R2 ;ALL TABLE DONE 
701 000232 001374 BNE .-6 ‘BR IF MORE TO GO 
702 0002 905037 001504 CLR DQNUM SET NUMBER OF DQ11S TO 0 
703 000240 012702 001400 MOV #1400,R2 ;SET TABLE POINTER 
704 000244 012701 160000 MOV #150000,R1 GET FIRST FLOATING ADDRESS 
705 000250 012737 000614 000004 MOV #5$ 044 SET FOR TIME OUT TRAP=-NO DEVICE-- 
706 000256 112761 000012 000005 1$: MOVB #12,5(R1) ;TRY AND SEL MISC REGISTER 
707 0002 005061 000006 CLR 6(R1) TRY AND CLEAR MISC REG 
708 000270 012711 010000 MOV #10000, (R1) ;TRY AND SET RX ACTIVE 
709 000274 022761 030000 000006 CMP #30000 ,6(R1) ;LOOK FOR SYNC 1 AND SYNC 2 
710 000302 001071 BNE 2$ :THIS IS NOT A DQ11 IF I BRANCH 
711 000304 010122 MOV R1,(R2)+ sNOW THIS IS A DQ11 ==-STORE CSR 
712 000306 052712 100000 BIS #SYNBIT, (R2) SET FOR TWO SYNC CHARS 
713 000312 005011 CLR R1) CLEAR DQ ACTIVE BIT 
714 000314 112761 000010 000005 MOVB no. 5(R1) SSEL CHAR DET REGISTER 
715 000322 012761 177777 000006 MOV #-1,6(R1) :WRITE INTO CHAR DET REG 
716 000330 005761 000006 TST 6(R1) WAS THE REGISTER WRITTEN? 
717 000334 001402 BEQ .+6 z;APPERENTLY NO BB OPTION. 
718 000336 052712 020000 BIS #BBBIT, (R2) :SET FOR BB OPTION 
719 000342 112761 000017 000005 MOVB #17,5(R1) SEL POLYNO. REGISTER 
720 000350 012761 177777 000006 MOV #-1,6(R1) ‘WRITE POLYNO.REGISTER 
721 000356 005761 000006 TST 6(R1) WAS REG WRITTEN?? 
722 000362 001402 BEQ .+6 BR IF NO AB OPTION 
723 000364 052712 002000 BIS HABBIT, (R2) SET FOR AB OPTION 
724 000370 012761 001400 000002 MOV 41400,2(R1) ;TRY TO SET .DTR. .RS. 
725 000376 032761 001400 9000002 BIT #1400,2(R1) ‘DID ANY OF THEM SET 
726 000404 001402 BEQ .+6 ‘BR IF NO BA OPTION 
727 000406 052712 010000 BIS MBABIT, (R2) SET FOR BA OPTION 
728 000412 032761 030000 000002 BIT #30000, hi? sDID CS. «CO. SEF 
729 000420 001402 BEQ +6 7;BR IF NO JUMPER 
730 000422 052712 040000 BIS #JUMBIT, (R2) ;SET FOR JUMPER 
731 000426 052712 C04000 BIS MACTBIT, (R2) ;SET FOR ACTIVE ON FIRST NON=SYNC 
732 000432 052712 001000 BIS #ODDBIT, (R2) ‘SET FOR ODD VRC....... 
733 000436 005722 TST (R2)+ :POP POINTER 
734 000440 005011 CLR (R1) [CLEAR RCSR 
735 000442 005061 000002 CLR 2(R1) :CLEAR TCSR 
736 000446 005061 000002 CLR 2(R1) s¢CL 
737 000452 005061 000004 CLR 4(R1) CLEAR ERROR REG 
738 000456 005061 000006 CLR 6(R1) CLEAR SEC REG 
739 000462 005237 001504 INC DQNUM UPDATE NUMBER OF DQ11S 
740 000466 062701 000010 23: ADD #10,R1 UPDATE CSR POINTER BY 10 (8) 
741 000472 022701 164000 CMP #164000,R1 HAVE ALL FLOAT [Ne ADDRESSES BEEN CHECKED?? 
742 000476 001267 BNE 1$ ‘BR IF NOT ALL DONE 
743 000500 005037 001500 CLR DQACTV sZERO ACTIVE tborTs 
744 000504 005737 001504 TST DQNUM SWERE ANY DQ11S FOUND 
745 000510 001434 BEQ 4$ “HEY BUDDY. NO DQ11S FOUND IN SYSTEM 
746 000512 013701 001504 MOV DQNUM ,R1 SAVE NUMBER OF DQ11S 
747 000516 010137 001276 MOV R1, SAVNUM + SAVE MBER FOR ACT11 
748 000522 000241 3$: CLC ; CLEAR CAR 
749 000524 006137 001500 ROL DQACTV - ACTIVE ADDRESS 
750 000530 005237 001500 INC DQACTV ‘SET BIT 


| CZDQF 


000534 
36 


MACY11 30(1046) 
CZDQFF P11 8 


05-MAY- 


001000 
005377 
043106 
020121 
051524 


001200 


177570 


OS=MAY=-81 14: 
1 09:27 


000466 


055103 


051524 


000004 
001502 
000022 


18 


43: 


5$: 


-=1000 


MTITLE: 


ERRCNT: 


dD 2 


PAGE 17 
ROUTINES USED FOR AUTO SIZING. 


R1 
3$ 


#6, aes 
DQACTV, SAVACT 
#340, a#22 
#1400,R2 
#300,R0 


#302,R1 
VE CMAP 


RO 


“2 
#2$, (SP) 


SEQ 0016 


DEC NUMBER OF DQ11S 

[BR IF MORE TO GO 

;RESET TIME OUT VECTOR 
ZSAVE ACTIVE 

[SET IOT TRAP PRIO: TO 7 
[SET TABLE POINTER 

7SET VECTOR START 

[SET VECTOR+2 START 

3GO FIND THE VECTORS 

s TYPE MESSA 


GE 
‘1 DIDN'T FIND ANY DQ11S. DON'T USE AUTO SIZE. 


SHOW CAN I TEST NO DQ11S 

;DON'T LET OPR HIT CONT. SW 

; ENTERED BY TIME OUT TRAP 
HOME . 


eASCIZ <377><12>/CZDOFFO/<377>/SEQ REG TSTS/<377> 


INDIRECT POINTERS 


177570 


SWITCH REGISTER POINTER 

DISPLAY REGISTER POINTER 

TELETYPE KEYBOARD CONTROL REGISTER 
[TELETYPE KEYBOARD DATA BUFFER 
STELEPRINTER CONTROL REGISTER 
ZTELEPRINTER DATA BUFFER 


PROGRAM CONTROL PARAMETERS 


DWDOOOWOOoO 


SCOPE ADDRESS FOR LOOP ON TEST 

ZADDRESS OF NEXT TEST TO BE at > ts 

TADDRESS FOR LOCK ON CURRENT DATA 

[NUMBER OF ITERATIONS THAT CURRENT TEST WILL BE EXECUTED 
[NUMBER OF ITEREATIONS COMPLETED 

[NUMBER OF TEST IN PROGRESS 

SNUMBER OF PASSES COMPLETED 

; TOTAL NUMBER OF ERRORS 


[PC OF LAST ERROR CALL 


PROGRAM VARIABLES 


QOoOooooo°oo 


; TEMPORARY STORAGE 


; TEMPORARY STORAGE 
[TEMPORARY STORAGE 
[TEMPORARY STORAGE 
; TEMPORARY STORAGE 


C2OFF PT 


CZDQF 


MACY11 30(1046) 
0S-MAY=81 


001256 
001260 


000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000001 
000000 


000000 
000000 


05-MAY-81 
09:27 


14: 8 PAGE 18 
PROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS. 


SAVRO: 
SAVR1: 
SAVR2: 
SAVRS: 
SAVR4: 
SAVRS: 
SAVSP: 
SAVPC: 
SAVNUM : 
CREAM: 
RUNFLG: 


RUN: 
RUNCNT : 


jeoleleleleleleiala| 


-BLKW 


ooo: 


- 


gE é 


:RO STORAGE 


*R5 STORAGE 
“STACK POINTER STORAGE 
‘PROGRAM COUNTER STORAGE 


SEQ 0017 


CZDQ0F MACY1T1 30(1046) 


OS=MAY-81 


O5S=MAY=81 09:27 


CZ7DQFF .P11 

820 

821 

B22 

823 00 000 
824 00 000 
825 00 G00 
826 00 000 
827 000000 
828 

829 

830 

831 

832 

833 

834 

835 001314 

836 104400 
837 001314 013236 
838 104401 
839 001316 013350 
840 104402 
841 001320 013370 
842 104403 
843 001322 013476 
844 104404 
B45 001324 013614 
846 104405 
B47 001326 013646 
848 104406 
849 001330 014062 
850 104407 
851 001332 014122 
852 104410 
853 001334 014154 
854 104411 
855 001336 014160 
856 104412 
857 001340 010766 
858 104413 
859 001342 010652 
860 104414 
861 001344 015062 
862 104415 
863 001346 015136 
864 

865 

866 

867 

868 

869 

870 001350 000000 
871 001352 000000 
872 001354 000000 
873 001356 

874 001360 000000 
875 001362 000000 


14: "3 PAGE 19 


F 2 


PROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS. 


INIFLG: 


:PROGRAM CONTROL FLAGS 


BYTE O 
BYTE 0 
0 
0 


: “BYTE 
: .BYTE 


; PROGRAM RV FLAG FLAG 


; TEST START 
SERROR OCCURED F 
SLOCK ON CURRENT TEST FLAG 


DEFINITIONS FOR TRAP SUBROUTINE CALLS 
POINTERS TO SUBROUTINES CAN BE FOUND 
IN THE TABLE IMMEDIATLY FOLLOWING THE DEFINITIONS 


TTT EERE RRR ERE EEE EKER HEE TERRE KE EER EH 
TEBE IEIEIIEIIIOE USS IEEIEIEIIEIIIIIUIUIIIIUIUIUIEOUOIOUIDOE RnR Et EH Het # 


. TRPTAB: 


SCOPE=TRAP+0 
- SCOPE 
SCOP1=TRAP+1 


ost 
TYPE=TRAP+2 
. TYP. 
INSTR= TRAP +3 
INSTER=TRAP+4 
. INST 


OP1 


STR 
ER 


PARAM=TRAP*5 
SAVO5= TRAP+ 
- SAV 
RESOS=TRAP+7 
-RESO5S 
CONVRT=TRAP+1 z. 
. CONVR 
CNVRT=TRAP+11 
. CNVRT 
MSTCLR= TRAP+ 12 


M 
MEMCLR=TRAP+13 
-MEMC 


;CALL TO 
;CALL TO 
CALL TO 
;CALL TO 
CALL TO 
;CALL TO 
CALL TO 
;CALL TO 
;CALL TO 
:CALL TO 
:CALL TO 
;CALL TO 
:CALL TO 
;CALL TO 


SCOPE LOOP AND ITERATION HANDLER 
LOOP ON CURRENT DATA HANDLER 
TELETYPE OUTPUT ROUTINE 

ASCII STRING INPUT ROUTINE 

INPUT ERROR HANDLER 

NUMERICAL DATA INPUT ROUTINE 
REGISTER SAVE ROUTINE 

REGISTER RESTORE ROUTINE 

DATA OUTPUT ROUTINE 

DATA OUTPUT ROUNTINE WITHOUT CR/LF. 
ISSUE MASTER CLEAR 

CLEAR ALL SCRATCH PAD MEMORIES 
ALLOW SWREG TO BE LOADED FROM TTY 
ALLOW LOADING OF SWREG FROM TTY 


FREER AERA AREER AREA EERE AAA AERA EERE ARERR TERRA ERA ARE E AEE EK EES 
See R ERE RR Em RERREKEKKARERE EEE EE 


DORVEC: 
DORLVL: 
DQTVEC: 
DQTLVL: 
DORCSR: 
DORCSH: 


3DQ11 VECTOR AND REGISTER INDIRECT POINTERS 


OQooooo 


;POINTER 
;POINTER 
sPOINTER 
;POINTER 
sPOINTER 
:POINTER 


TO DQ11 RECEIVER INTERRUPT VECTOR 

TO DQ171 RECEIVER INTERRUPT SERVICE PS 

TO DQ11 TRANSMITTER INTERRUPT VECTOR 

TO DQ11 TRANSMITTER INTERRUPT SERVICE PS 

TO DQ11 RECEIVER CONTROL REGISTER 

TO HIGH BYTE OF DQ11 RECEIVER CONTROL REGISTER 


SEQ 0018 


G 2 
CZDOF MACY11 30(1046) O5S=MAY-81 14:18 PAGE 20 
PROGR 


CZDQFF P11 OS=MAY=81 09:27 AM PARAMETERS, VARIABLES, AND TRAP CALLS. SEQ 0019 
876 001364 000000 DOTCSR: 0 POINTER TO DQ11 TRANSMITTER CONTROL REGISTER 
877 001366 000000 DQERR: QO :POINTER TO DQ11 ERROR REGISTER 
878 001370 000000 DQREG: 0 ‘POINTER TO HIGH BYTE OF ERROR REGISTER 
879 001372 000000 DQSEC: 0 [POINTER TO DQ11 SECONDARY REGISTER 
Bet 001374 900000 DQSECH: 0 [POINTER TO HIGH BYTE OF DQi1 SECONDARY REGISTER 
882 
883 
poe 3DQ11 STATUS TABLE AND ADDRESS ASSIGNMENTS 
886 001400 =1400 
887 “ 000001 DOCROO: .BLKWw 1 CONTROL STATUS REGISTER FOR DEVICE NO: 00 
888 001402 000001 DQSTOO: .BLKw 1 SVECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 
889 001404 000001 DQCRO1: .BLKW 1 CONTROL STATUS REGISTER FOR DEVICE NO: 01 
890 901406 000001 DQSTO1: .BLKW 1 :VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 01 
891 001410 000001 DQCRO2: .BLKW 1 CONTROL STATUS REGISTER FOR DEVICE NO: 02 
892 001412 000001 DQSTO2: .BLKW 1 [VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 02 
893 001414 000001 DQCRO3: .BLKW 1 CONTROL STATUS REGISTER FOR DEVICE NO: 03 
894 001416 000001 DQSTO3: .BLKW 1 [VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 03 
895 001420 000001 DQCRO4: .BLKW 1 = CONTROL STATUS REGISTER FOR DEVICE 04 
896 001422 000001 DQSTO4: .BLKW 1 VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 04 
897 001424 000001 DOCROS: .BLKW 1 “CONTROL STATUS REGISTER FOR DEVICE NO: 9 
898 001426 000001 DQSTOS: .BLKW 1 ;VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 05 
899 001430 000001 DQCRO6: .BLKW 1 :CONTROL STATUS REGISTER FOR DEVICE NO: 06 
900 001432 000001 DQSTO6: .BLKW 1 :VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 06 
901 001434 000001 DQCRO7: .BLKW 1 CONTROL STATUS REGISTER FOR DEVICE NO: 07 
902 001436 000001 DOSTO7?: .BLKW 1 :VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 07 
903 001440 90000 DOCR10: .BLKW 1 [CONTROL STATUS REGISTER FOR DEVICE NO: 10 
904 001442 000001 DQST10: .BLKW 1 VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 10 
905 001444 000001 DQCR11: .BLKW 1 = CONTROL STATUS REGISTER FOR DEVICE NO: 11 
906 001446 000091 DQST11: .BLKW 1 VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 11 
907 001450 00001 DQCR12: .BLKWw 1 = CONTROL STATUS REGISTER FOR DEVICE NO: 12 
908 001452 1 DQST12: .BLKW 1 [VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 12 
909 001454 1 DQCR13: .BLKW 1 [CONTROL STATUS REGISTER FOR DEVICE NO: 13 

~ 910 901456 000001 DQST13: .BLKW 1 sVECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 13 
911 1460 000001 DOCR14: .BLKW 1 CONTROL STATUS REGISTER FOR DEVICE NO: 14 
912 001462 000001 DQST14: .BLKW 1 ‘VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 14 
913 001464 000001 DQCR15: .BLKW 1 :CONTROL STATUS REGISTER FOR DEVICE NO: 15 
914 001466 000001 NQST15: .BLKW 1 [VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 15 
915 001470 000001 DOCR16: .BLKW 1 CONTROL STATUS REGISTER FOR DEVICE NO: 16 
916 001472 000001 DQST16: .BLKW 1 [VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 16 
917 001474 000001 DQCR17: .BLKW 1 CONTROL STATUS REGISTER FOR DEVICE NO: 17 
918 001476 000001 DQST17: .BLKW 1 TVECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 17 
919 1500 000001 DQACTV: .BLKW 1 sHOLD ACTIVE BITS FOR TESTING 
920 001502 000001 SAVACT: .BLKW 1 : SAVE NUMBER OF ACTIVE DQ11S 
921 001504 000001 DQNUM: .BLKW 1 [OCTAL NUMBER OF TOTAL a OD DQ11S 
922 001506 000001 DOCSR: .BLKW 1 = CSR OF DQ11 UNDER TES 
oa 001510 000001 DQSTAT: .BLKW 1 : VECTOR AND CONF 1 GURAT ION STATUS OF DQ11 UNDER TEST 
925 PROGRAM INITIALIZATION 
926 LOCK OUT INTERRUPTS 
927 SET UP PROCESSOR STACK 
928 :SET UP POWER FAIL VECTOR 
929° CLEAR PROGRAM CONTROL FLAGS AND COUNTS 
930 7 TYPE TITLE MESSAGE 


C2DQF MACY11 30(1046) O5=MAY-81 14:18 PAGE 21 
| CZDQFF P11 05-MAY=81 09:27 PROGRAM INITIALIZATION AND START UP. 
932 001512 012737 000340 177776 .START: MOV #340,PS 
933 001520 012706 001200 MOV ASTACK , SP 
934 001524 012737 4764 000024 MOV #.PFAIL ,@a24 
| 935 001532 013737 001504 001276 MOV DQNUM , SAVNUM 
936 001540 105037 001311 CLRA STFLG 
| 937 001544 005037 0012 CLR PASCNT 
938 001550 105037 001312 CLRB Coote 
939 001554 005037 001302 CLR RUN 
940 001560 012737 001400 001300 MOV 1400, CREAM 
941 1566 005037 001232 CLR ERRC 
942 001572 005037 001234 CLR ESTER 
943 001576 012737 000001 001226 MOV #1,TSTNO 
ore 1604 012737 1512 001214 MOV #. START ,RETURN 
| 946 001612 012737 177570 001200 MOV ADSWR , SWR 
947 001620 012737 177570 001202 MOV ADLIGHTS,LIGHTS 
948 001626 013746 000006 MOV a46 ,- (SP) 
949 001632 013746 000004 MOV a4 ,-(SP) 
950 001636 012737 001656 000004 MOV #643 044 
951 001644 022777 177777 177326 CMP 4-1 ,aSWR 
952 001652 001402 BEQ 65$ 
953 001654 000407 BR 66$ 
954 001656 022626 64$: CMP (SP)+,(SP)+ 
955 001660 012737 000176 001200 65$: MOV ASWREG, SWR 
956 1666 012737 000174 001202 MOV #DISPREG,LIGHTS 
957 001674 012637 000004 66$: MOV (SP) +, a4 
958 001700 012637 000006 MOV (SP) +, a6 
959 001704 005737 000042 TST @442 
7 001710 001014 
962 001712 105737 001310 INIF 
963 001716 001035 E 12$ 
964 001720 104402 001000 TYPE eMTITLE 
965 001724 105137 001310 COMB INIFLG 
966 001730 022737 000176 001200 CMP ASWREG, SWR 
967 001736 001001 BNE 67$ 
968 001740 104415 CNTLU 
969 001742 105777 177232 67$: TSTB @aSWR 
970 001746 100402 BMI +6 
971 001750 737 000220 JSR PC ,CSRMAP 
972 001754 104402 015612 TYPE -XHEAD 
973 001760 012737 001400 001244 MOV #1400, TEMP1 
974 17 017737 177252 001246 MOV aTEMP1,TEMP2 
975 001774 14 BEQ -+16 
976 001776 104410 CONVRT 
977 002 015640 XSTATQ 
978 2002 062737 000002 001244 ADD #2,TEMP1 
979 002010 7 BR = 
980 002012 032777 000001 177160 12$: BIT #SW00 ,aSWR 
981 002020 001424 BEQ 1$ 
982 002022 104402 TYPE 
983 002024 015533 MNE W 
984 002026 005000 CLR RO 
985 002030 000000 HAL T 
986 002032 104414 CKSWR 
987 002034 027737 177140 001502 CMP @SWR,SAVACT 


H 2 


;LOCK OUT gan 
a UP STA 
;SET UP POWER FAIL VECTOR 


:CLEAR START FLAG 
:CLEAR PASS COUNT 
;CLEAR ERROR FLAG 


;CLEAR ERROR COUNT 

CLEAR LAST ERROR POINTER 
:SET UP FOR TEST 1 

7SET UP FOR POWER FAIL BEFORE 
TESTING STARTS 

[MOV HARDWARE SWR TO SWR 

MOV DISPLAY LIGHTS TO LIGHTS 
SAVE VECTORS 


7SET UP FOR TIMEOUT 
;REFERENCE HARDWARE SWITCH REGISTER 


sADJUST STACK 

:POINT TO SOFTWARE SWITCH REG 
=POINT TO SOFT DISPLAY REG 
ZRESTORE VECTORS 


;UNDER MONITOR 


BNE 67$ 
pe was teks NEXT 4 Ee OF CODE MOVED a he ges PRA2757 (JUNE 78) ****** 


uF AS od eee: BEEN PERFORMED? 


YES 
TYPE TITLE ME SSAGE 
IF NOT SET FLAG AND INIT 
31S SWREG USED 


SEQ 0020 


CZ7DQF MACY11 30(1046) 


i ¢ CZDQFF P11 


989 


1009 


— — 2 ot et I 
OOCOOOC9C0000 
ek ed et od ow 
WONAUES WMO 


002042 


05=MAY=81 


eooesles 
o--oO0-?-- 


FERRARA REREREREEERERE REET EERE REAR AER RAERRRARERAEAAAARAAR HARARE ES 


ee 


OS=MAY-81 14:18 PAGE 22 
09:27 PROGRAM INITIALIZATION AND START UP. 
BLOS 11$ 
TYPE 
MERR3 
HALT 
BR 72 
177120 001500 11$: MOV aSwWR ,DQACTV 
001500 MOV DQACTV,RO 
HALT 
CKSWR 
000300 1$: MOV #390,R0 
000302 MOV #302,R1 
2$: MOV R1,(RO)+ 
CLR (R1)+ 
CMP (RO) +, (R1)+ 
001000 CMP #1000,R0 
BNE c$ 
s TEST START AND RESTART 
000340 177776 .BEGIN: MOV #340,PS 
001200 MOV #STACK, SP 
000042 TST ar4s2 
BNE 3$ 
CKSWh 
000004 177032 BIT #BIT2,aSWR 
BEQ 1$ 
015432 TYPE MOCK 
000240 013246 MOV #NOP ,TTST 
000240 013250 fy thea 
013344 013246 1$: MOV BRW,TTST 
013346 013250 MOV BRX,TTST+#+2 
000002 176764 2$: BIT #SWO1,aSWR 
BEQ 3$ 
INSTR 
MTSTPC 
PARAM 
TST1 
TLAST 
#RE TURN 
-BYTE 1 
BYTE 1 
BR 4$ 
002254 001214 3$: V #TST1,RETURN 
015322 4$: TYPE F 
176740 JMP @RE TURN 
s Tes? 1 
1 001226 TST1: MOV #1,TSTNO 
002644 001214 MOV #TST2,RETURN 
002644 001216 MOV #TST2,NEXT 
001302 TSTB RUNF LG 
BNE 1$ 
1 001304 MOV #B1T0,RUN SET 
000020 001306 MOV #16. ,RUNCNT SET 
001302 COMB RUNF LG SET 


;LOCK OUT + ath 


7SET UP STA 


:IS PROGRAM UNDER MONITOR CONTROL 


sCHECK FOR <*G> 


; CHECK FOR LOCK ON TEST 


;SET UP TO LOCK 


LOCK NOT SELECTED, SET UP FOR NORMAL SCOPE LOOP 
GET STARTING PC 


F SWO1=1, 


Fae AT TEST 1 
STAR? TESTING 


71S THIS MY FIRST TIME HERE? 
[BR IF FLAG is SET 
cin POINTER 

bey OF 16 DO11"S PER SYSTEM 


FLAG 


SEQ 0021 


J 2 


RUN ,DQACTV 
3$ 

DQACTV 

2s 


RUN 

#4 ,CREAM 
RUNCNT 

1$ 

#15. ,RUNCNT 


#1400,CREAM 
oon 


_ 


oe 


RUN 
@CREAM,DQCSR 
#2, CREAM 
@CREAM, DOSTAT 
#2, CREAM 
DOCSR,DQRCSR 
DOSTAT ,DQRVEC 
#177007 ,DORVEC 
DORVEC ,DORLVL 
#2,DORLVL 
DORLVL ,DQTVEC 
#2, DQTVEC 
DOTVEC ,DOTLVL 


#2,DQTLVL 
DORCSR ,DQRCSH 
DQRCSH 
DORCSR ,DQTCSR 
#2,DQTCSR 
DOTCSR,DQERR 
#2 ,DQERR 
DOERR , DOREG 
DOREG 
DOQREG,DQSEC 
QSEC 


DQS 
DQSEC ,DQSECH 
DQSECH 


PROGRAM INITIALIZATION AND START UP. 


3FIND AN ACTIVE eto test TEST. 


:BR IF I FOUND ONE 


TEST. 
FIND OUT IF THERE ARE NO DO11 ACTIVE. 


[BR TO FATAL ERROR. WHY AM I HERE 


CLEAR ALL THE CONDITION CODES OF CPU 
[UPDATE RUN POINTER 
[UPDATE ADDRESS POINTER 


;DEC NUMBER OF TIMES I LOOKED AT ACTIVE. 


;BR AND KEEP L 


OOK ING. 
START RESTORING MY POINTERS. 
TRESTORE ADDRESS POINTER 


SRESTORE RUN POINTER. 


[KEEP ON TESTING. 


ZALLERT OPERATOR OF FATAL ERROR 

[NO DQ11 ACTIVE. WHY AM I HERE??? 
;YOU MUST RELOAD DQ11 DIAGNOSTIC!! 
7STICK HERE ON CONT. 


[UPDATE ADDRESS POINTER 
[PLACE STATUS OF DQ11 AT DQSTAT 
;UPDATE ADDRESS POINTER 


; GENERATE 
; GENERATE 
; GENERATE 
GENERATE 
; GENERATE 
7 GENERATE 
; GENERATE 
7 GENERATE 
; GENERATE 


THIS IS NOT A TEST!!! 


ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 


SEQ 0022 


IF NO ACTIVE DQ11°S??? 


SUP 
PLACE ADDRESSS OF DQ11 AT DOCSR 


OF RECEIVER INTERRUPT SERVICE PS 
OF TRANSMITTER INTERRUPT VECTOR 
OF TRANSMITTER INTERRUPT SERVICE PS 


OF HI 


OF 
OF 
OF 
OF 
OF 


GH BYTE 
TRANSMITTER CONTROL REGISTER 


ERROR REGISTER 
HIGH BYTE OF ERROR REGISTER 
SECONDARY REGISTER 


HIGH BYTE 


FERRER EEE EERE EERE EEE AEE EERE RAAT R ERE E AERA R REAR EES 


| ¢ZpOF  MACY11 30(1046) O5=MAY-81 14:18 PAGE 23 

— CZDQFF #11 05=MAY=81 09:27 

| 

1044 002324 033737 001304 001500 1$: BIT 
1045 002332 001032 BNE 
1046 2334 005737 001500 TST 

| 1047 002340 001423 BEQ 

| 1048 =002342 00025 CCC 

1049 002 006137 001304 ROL 
1050 002350 062737 000004 001300 ADD 
1051 002356 005337 001306 DEC 
1052 2 1360 BNE 
1053 2 012737 000020 1306 MOV 
1054 002372 012737 001400 001300 MOV 
1055 24 012737 000001 001304 MOV 
1056 24 746 BR 
1057 002410 104402 23: TYPE 
1058 002412 015325 MERR2 
1059 002414 HALT 
1060 002416 000776 BR 
1061 002420 000257 3$: ccc 
1062 002422 006137 001304 ROL 
1063 002426 017737 176646 0015 MOV 
1064 002434 062737 2 001300 ADD 
1065 002442 017737 176632 001510 MOV 
1066 002450 062737 002 001300 ADD 
1067 002456 013737 001306 001360 MOV 
1068 002464 013737 001510 001350 MOV 
1069 002472 042737 177007 001350 BIC 
1070 002500 013737 001350, 001352 MOV 
1071 25 062737 2: ADD 
1072 002514 013737 001352. 001354 MOV 
1073 002522 2737 000002% 001354 ADD 
1074 002530 013737 001354 001356 MOV 
1075 002536 062737 002 001356 ADD 
1076 002544 013737 001360 001362 MOV 
1077 002552 005237 1362 INC 
1078 002556 013737 001360 001364 MOV 
1079 25 062737 2 001364 ADD 
1080 002572 013737 001364 001366 MOV 
1081 002 062737 000002 001366 ADD 
1082 002 013737 001366 001370 MOV 
1083 002614 005237 001370 INC 
1084 002620 013737 001370 001372 MOV 
1085 002626 5237 001372 INC 
1086 002632 013737 001372 091374 MOV 
1087 2640 005237 001374 INC 
1089 
1090 TEST 2 
1092 002644 012737 000002 001226 TST2: MOV 
seer 002652 012737 002662 001216 MOV 

| 1095 
1096 002660 104400 SCOPE 
1097 
1098 
1099 


#2, yh 
#1573. 

3 THE ORIGINAL TEST 2 IS 
[NOW TEST 2 OF TAPE DZDOH 


—— -—_—--—- — —— - ——— - - — - a CC Et eC 


K 2 
C2DOF MACY11 30(1046) O5=MAY-81 14:18 PAGE 24 


j 
| 
| CZDQFF.P11 05=May=81 09:27 PROGRAM INITIALIZATION AND START UP. SEQ 0023 
| 1100 TEST 10 SEE IF EVERY CHARACTER FROM 
' 4101 :0 TO 377 CAN BE DETECTED IN CHARACTER 
1102 “DETECT ADDRESS ZERO. 
| 1105 :NOTE : SWO9=1 WILL FREEZE ON CURRENT DATA. 
| 1105 : TEST s 
1106 5 RRARRERARARARARRARRERAREEAAERAARERERRARARARRRERERARAORARA RRA RA ASRS ES 
1107 002662 012737 000003 001226 TsT3: MOV #3, TSTNO 
/ 1108 002670 012737 003214 001216 MOV #TST4,NEXT 
| 1109 002676 012737 002744 001220 MOV #1$,LOCK 
1110 002704 032737 020000 001510 BIT #BBBIT,DQSTAT ;DOES THIS DQ11 HAVE THE ‘BB'’ OPTION INSTALLED? 
| 1111 002712 001005 BNE 13$ [BR IF YES 
| 4112 002714 «012737 ~«013050 001214 MOV #. EOP ,RETURN :GOTO END PASS 
1113 002722 000177 176266 IMP @RE TURN 
1114 002726 104413 13$: MEMCLR “CLEAR ALL THE DQ11 
1115 002730 105037 013047 6$: CLRB DETCAR+1 ‘CLEAR THE CHARACTER STORAGE AREA 
1116 002734 005037 013044 CLR GDCHAR 'SET FOR ERROR PRINTOUT 
1117. 002740 005037 013042 CLR ADDR + SAME . 
1118 002744 012737 000010 013040 1$: MOV #8. , COUNT SEIGHT BITS FOR EIGHT SHIFTS. 
1119 0602752 013702 013040 2$: MOV COUNT ,R2 *GET NUMBER OF SHIFTS PER CHAR. 
1120 002756 105077 176400 CLRB aDORCSH =GET CHAR ADDR. ZERO 
1121 002762 105077 176402 CLRB  aDQREG ‘GET RX BA PRI. 
1122 002766 012777 012216 176376 MOV #RXBUFF,Q@DQSEC ;LOAD IT 
1123 002774 105277 176370 INCB a@DQREG =GET RX WC PRI. 
1124 003000 012777 000200 176364 MOV #200, aDQSEC sLOAD IT 
1125 003006 105077 176350 3$: CLRB @DORCSH “SELECT CHARACTER DET REG 0 
1126 003012 113737 013047 013044 MOVB DETCAR+1,GDCHAR ; 
1127 003020 112777 000010 176342 MOVB #10, aDQREG SSELECT THE CHARACTER DET REGISTER. 
1128 003026 013777 013046 176336 MOV DETCAR. @DQSEC :LOAD THE CHARACTER TO BE DETECTED 
1129 003034 112777 000014 176326 MOVB #14,aDQREG *SELECT THE SEQUENCE REGISTER 
1130 3042 012777 120000 176322 MOV witiseBIT13. aDasec :SET SINGLE CHARACTER REC AND SET FLAG. 
1131 003050 112777 000012 176312 MOVB  #12,@DQREG COMM 
1132 012777 004012 176306 MOV #4012, aDQSEC *SELECT EIGHT gels TEST LOOP AND AUTO STEP 
1133 052777 010001 176266 BIS WITiD*BITO. @DORCSR :SET RX ACTIVE AND RX GO 
1134 003072 013737 013046 015714 MOV DETCAR, TEMP :MOV CHARACTER TO WORKING AREA 
1135 003100 105137 015715 COMB TEMP+1 ‘COMPLIMENT DATA FOR USE ON THE BIT WINDOW 
1136 003104 042777 000200 176260 4$: BIC #B1T7,aDQSEC ‘IF PREVIOUSLY SET; CLEAR THE BIT WINDOW. 
1137 00311? 37 015714 ROR TEMP ‘SHIFT OUT THE BIT OF DATA. 
1138 003116 013703 015714 MOV TEMP ,R3 ‘STORE CHAR 
1139 003122 042703 177577 BIC #*°C<BIT7>,R3 ‘CLEAR ALL UNWANTED BITS 
1140 003126 050377 176240 BIS R3,aDQSEC “PLACE DATA ON THE BIT WINDOW 
1141 003132 005277 176234 INC aDOSEC :CLOCK UP 
1142 003136 005377 176230 DEC aDOSEC =CLOCK DOWN 
1143 003142 005302 DEC R2 *1S CHARACTER DONE YET 
1144 003144 001357 BNE 4$ ‘BR IF NOT DONE 
1145 003146 005777 176206 TST @DORCSR ‘WAS THE CHARACTER REALLY DETECTED? 
1146 003152 100401 BMI +4 ‘BR IF GOOD 
1147 003154 104002 HLT 2 TERROR CHARACTER NOT DETECTED. 
1148 003156 017737 176176 015714 MOV @DORCSR, TEMP *GET THE RECEIVER CSR. 
1149 003164 0427 170377 015714 BIC #*(<7400>, TEMP CLEAR ALL BUT THE CHARACTER DET. ADDR. 
1150 003172 005737 015714 TST TEMP WAS THE CHAR DET. IN ADDR ZERO? 
1151 003176 001401 BEQ +4 
1198 32 104002 HLT 2 “CHAR NOT DETECTED IN ADDR. ZERO.. 
jecere *L Ke ence eer eee --- 
1134 003202 104401 SCOP1 sI1F SwO9=1; THEN GOTO ADDRESS IN ‘LOCK’. 


reesiteeaiaprtet nett peratine sen tren cen eer IS 


ca 

 CZDQF MACY11 30(1046) O5-MAY-81 14:18 PAGE 25 

| CZDQFF.P11 05=MAY=81 09:27 PROGRAM INITIALIZATION AND START UP. SEQ 0024 
1156 003204 i e534 013047 INCB DETCAR*+1 sHAVE I HIT MY LIMIT YET? 

1157 003210 001260 BNE es [NO RETURN WITH UPDATED CHAR. 

1189 003212 104400 SCOPE :SCOPE TEST 
1160 
1161 
1162 

_ 1163 

1164 TEST THAT CHARACTERS FROM 
1165 $400 TO 177400 CAN BE DETECTED. 
1166 7 IN CHACTER DETECT ADDRESS ZERO. 
Bee [NOTE: SWO9=1 WILL FREEZE ON CURRENT DATA. 
1169 ; «TEST 4 
1170 © REE REE EEEEOERERRE REE REE ERE E ERE ER EER 
1171 003214 012737 000004 001226 TST4: MOV #4 ,TSTNO 
1172 003222 012737 003514 001216 MOV #7575 NEXT 
1173 003230 012737 003252 001220 MOV #1$,LOCK 
1174 003236 005037 013046 CLR DETCAR SET CHAR TO ZERO 
1175 003242 005037 913044 CLR GDCHAR ;SET FOR ERROR 
1176 003246 005037 013042 CLR ADDR ; SAME 
1177 003252 1$: 
1178 003252 012702 000020 2$: MOV #16. ,R2 SET COUNT FOR 16 BIT CHARS 
1179 003256 105077 176106 3$: CLRB @DQREG 7SEL THE RX BA PRI. 
1180 003262 012777 012216 176102 MOV aie @DQSEC LOAD IT 
1181 003270 105277 176074 INCB SEL THE RX WC PRI. 
1182 003274 012777 000200 176070 MOV 7200, SpaseC zLOAD IT 
1183 003302 105077 176054 CLRB @DORCSH GET CHAR ADD ZERO 
1184 003306 112777 000010 176054 MOVB #10, aDQREG ZGET CHAR ADDRESS 
1185 003314 013777 013046 176050 MOV DETCAR. @DQSEC ;LOAD THE CHARACTER TO BE DETCETED 
1186 003322 112777 000014 176040 MOVB #14, aDQREG 7GET THE SEQ REG. 
1187 003330 012777 050000 176034 MOV mifiovelli6, aDQseECc ;LOAD DBL CHAR AND SET FLAG 
1188 003336 112777 000012 176024 MOVB #12, aDQREG SEL MISC REG. 
1189 003344 012777 000012 176020 MOV wit sB1Ts, apasec SET TEST LOOP AND AUTO/STEP 
1190 003352 052777 010001 176000 BIS #81112+B1TO,aDQRCSR SET RX ACTIVE AND GO 
1191 003360 013737 013046 015714 MOV DETCAR, TEMP :GET DATA CHAR. 
1192 003366 013737 013046 015044 MOV DETCAR.GDCHAR FOR ERROR 
1193 003374 005137 015714 COM TEMP [PREPARE FOR BIT WINDOW 
1194 003400 042777 000200 175764 4$: BIC #B1T7,aDQSEC ;ZERO BIT WINDOW 
1195 003406 000241 CLC CLEAR CARRY 
1196 003410 005037 001244 CLR TEMP 1 : 
1197 003414 006037 015714 ROR TEMP : 
1198 003420 106037 001244 RORB TEMP1 ; 
1199 003424 053777 001244 175740 BIS TEMP’ , @DQSEC [PLACE DATA ON BIT WINDOW 
1200 003432 005277 175734 INC aDQSEC CLOCK THE 
1201 003436 005377 175730 DEC aDQSEC DQ11 
1202 003442 DEC TIS ALL THE CHAR DONE? 
1203 003444 001355 4$ ;BR IF NO 
1204 003446 005777 175706 TST aDORCSR ;DID THE FLAG SET? 
1205 003452 100401 BMI .+4 SBR IF YES 
1206 003454 104 HLT 2 CHARACTER DET. FLAG NOT SET FOR DBL CHAR. 
1207 003456 017737 175676 015714 MOV @DORCSR, TEMP SGET THE RECEIVER CSR. 
1208 003464 04 170377 015714 BIC #*(<7400>, TEMP ;CLEAR ALL BUT THE CHARACTER DET. ADDR. 
1209 003472 005737 015714 TST TEMP ;WAS THE CHAR DET. IN ADDR ZERO? 
1210 003476 001401 BEQ .*4 
1211 003500 104002 HLT 2 “CHAR NOT DETECTED IN ADDR. 7ERO.. 
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PROGRAM INITIALIZATION AND START UP. 


14:18 PAGE 26 


pecees #LOCK* -+----------- 


SCOP1 y1F SWO9=1; THEN GOTO ADDRESS IN ‘LOCK"’. 
INCB DETCAR+1 UPDATE THE DATA 

BNE 1$ :ALL DONE? 

SCOPE SCOPE WHEN ALL DATA DONE. 


; TEST THAT A CHARACTER CAN 
BE DETECTED IN ALL 16 CHARACTER 
DETECT ADDRESSES 


STEST THAT THE CHARACTER 255 
‘CAN BE DETECTED IN CHARACTER 
“DETECT ADDRESS 00 


: Test § 

FEAR ATTA AAA AAA AERA AERA EAA E AE AS EES 

TST5: MOV #5,TSTNO 
MOV #TST6,NEXT 
MOV #00, ADDR 
JSR PC, CHK. ADD 


;LOAD THE ADDRESS 
7GO AND LOAD THe CHARACTER. 
;SCOPE THIS TEST 


“TEST THAT THE CHARACTER 255 
“CAN BE DETECTED IN CHARACTER 
“DETECT ADDRESS 01 


s VEST 6 
LEER AEE EAA AAA AAA ALAA AAA AA AAA AEA AST ES TS 
TST6: MOV #6,TSTNO 

MOV #TST7,NEXT 

MOV #01,ADDR ;LOAD THE ADDRESS 

JSR PC,CHK.ADD ;GO AND LOAD THE CHARACTER. 

SCOPE sSCOPE THIS TEST 


STEST THAT THE CHARACTER 255 
“CAN BE DETECTED IN CHARACTER 
“DETECT ADDRESS 02 


> TEST? 
d eesc csececeecovecnreveverevensannencosenseseesserererecsesesoretenes 
TST7: MOV #7, TSTNO 

MOV #75T10,NEXT 

MOV #02,ADDR sLOAD THE ADDRESS 

JSR PC, CHK. ADD °GO AND LOAD THE CHARACTER. 

SCOPE ‘SCOPE THIS TEST 


STEST THAT THE CHARACTER 255 
“CAN BE DETECTED IN CHARACTER 


SEQ 0025 





| CZDQF _MACY11 30(1046) 
| CZDQFF.P11 05=MAY=-81 
1268 
1269 
1270 
1271 
1272 003624 012737 
1273 003632 012737 
1274 3640 012737 
1275 3646 737 
1276 003652 104400 
1277 
1278 
1279 
1280 
1281 
1282 
1283 
1284 
1285 003654 012737 
1286 3662 012737 
1287 003670 012737 
1288 003676 004737 
1289 003702 104400 
1290 
1291 
1292 
1293 
1294 
1295 
1296 
1297 
1298 37 012737 
1299 003712 012737 
1300 003720 012737 
1301 0603726 004737 
1302 003732 104400 
1303 
1304 
1205 
1306 
1307 
1308 
1309 
1310 
1311 003734 012737 
1312 003742 012737 
1313 002750 012737 
1314 003756 004737 
1315 003762 104400 
1316 
1317 
1318 
1319 
1320 
1321 
1322 
1323 


~ 





05=MAY-81 
09:27 


000013 
003764 


000006 
004314 


013042 


001226 


N 2 

PROGRAM INITIALIZATION AND START UP. 
4 :DETECT ADDRESS 03 

: TEST 10 


FRRRRRERR ERATE ET EEE EER REAR EERE RATER EERE REAR RRR E REE E RE EES 
TST10: MOV #10,TSTNO 

MOV MTST11,NEXT 

MOV #03,ADDR ;LOAD THE ADDRESS 

JSR PC,CHK.ADD ;GO AND LOAD THE CHARACTER. 

SCOPE ;SCOPE THIS TEST 


14:18 PAGE 27 


[TEST THAT THE CHARACTER 255 
[CAN BE DETECTED IN CHARACTER 
“DETECT ADDRESS 04 


s Yes? 11 
, matennestaniwonseooesnedi aneaubietenbnsatsdneteingnngenennesones 
TST11: MOV #11,TSTNO 

MOV MTST12,NEXT 

MOV #04 ,ADDR ;LOAD THE ADDRESS 

JSR PC,CHK.ADD 7GO AND LOAD THE CHARACTER. 

SCOPE ;SCOPE THIS TEST 


=TEST THAT THE CHARACTER 255 
“CAN BE DETECTED IN CHARACTER 
“DETECT ADDRESS 05 


TEST 12 
SISO IOUS TEETER EE ETRE ER EERE EEE 
TST12: MOV #12,TSTNO 
MOV #TST13,NEXT 
MOV #05,ADDR ;LOAD THE ADDRESS 
JSR PC,CHK.ADD 7GO AND LOAD THE CHARACTER. 
SCOPE zSCOPE THIS TEST 


:TEST THAT THE CHARACTER 255 
“CAN BE DETECTED IN CHARACTER 
“DETECT ADDRESS 06 


; TEST 13 
FERRARA AEAEREEEEREEREEERE RARER AREER REEREREERAEREERRE RAE REE RARER AES 
TST13: MOV #13,TSTNO 

MOV ATST14,NEXT 

MOV #06,ADDR ;LOAD THE ADDRESS 

JSR PC,CHK.ADD :GO AND LOAD THE CHARACTER. 

SCOPE :SCOPE THIS TEST 


[TEST THAT THE CHARACTER 255 
*CAN BE DETECTED IN CHARACTER 
“DETECT ADDRESS 07 


TEST 14 a 


{AMAA AAAAAAAAAHEREEE TRE EEEAELERAAARAAAERERATHAAAAEHHREHERETEEHEH EES + 
. 


SEQ 0026 


2 artes a ee eee 


B 3 
| CZDQF MACY11 30(10466) O5S-MAY=81 14:18 PAGE 28 
CZDQFF P11 O5=MAY=81 09:27 PROGRAM INITIALIZATION AND START UP. SEQ 0027 
| 1324 003764 012737 000014 001226 TST14: MOV #14,TSTNO 
1325 003772 012737 904014 001216 MOV ATST15,NEXT 
1326 004000 012737 000007 013042 MOV #07, ADDR ;LOAD THE ADDRESS 
| 1327 004006 004737 004314 JSR PC,CHK.ADD 3GO AND LOAD THE CHARACTER. 
1358 004012 104400 SCOPE ;SCOPE THIS TEST 
| 1330 5 
1331 TEST THAT THE CHARACTER 255 
1332 ;CAN BE DETECTED IN CHARACTER 
1333 sDETECT ADDRESS 10 
1334 : 
1335 TEST 15 
13%6 FRAAAAAAAAAEAARRRARAAEREEAEEEAREAERERRREHRERRRARERERRRARERARAAAR EEE ES 
1337 006014 012737 000015 001226 TST15: MOV #15,TSTNO 
1338 004022 012737 004044 001216 MOV MTST16,NEXT 
1339 004030 012737 000010 013042 MOV #10,ADDR ;LOAD THE ADDRESS 
1340 004036 004737 004314 JSR PC, CHK .ADD :GO AND LOAD THE CHARACTER. 
Lt a 004042 104400 SCOPE ;SCOPE THIS TEST 
1343 3 
1344 :TEST THAT THE CHARACTER 255 
1345 7CAN BE DETECTED IN CHARACTER 
1346 ;DETECT ADDRESS 11 
1347 2 
1348 TEST 16 
1349 SRAAAAAAAAAAAAAAAARER EERE AAO RAEARARRRAAAAAAARAAAAAAANRAHAAAAAAAA SHEA ES 
1350 004044 012737 000016 001226 1TST16: MOV #16, TSTNO 
1351 004052 012737 004074 001216 MOV MTST17,NEXT 
1352 004040 012737 000011 013042 MOV #11,ADDR ;LOAD THE ADDRESS 
1353 004006 004737 004314 JSR PC.CHK.ADD :GO AND LOAD THE CHARACTER. 
1326 004072 1044090 SCOPE : SCOPE THIS TEST 
1356 ; 
1357 TEST THAT THE CHARACTER 255 
1358 CAN BE DETECTED IN CHARACTER 
1359 sDETECT ADDRESS 12 
1360 2 
1361 wes) if 
1362 FERRARA AAA ATTA AERA AAAAAAEAAAAAA AAA AAA ATTA AAAS AAA A SS SS 
1363 004074 012737 000017 001226 TST17: MOV #17,TSTNO 
1364 004102 012737 004124 001216 MOV ATST20,NEXT 
1365 004110 012737 000012 013042 MOV #12,ADDR sLOAD THE ADDRESS 
1366 004116 004737 0043514 JSR PC,CHK.ADD :GO AND LOAD THE CHARACTER. 
13 004122 104400 SCOPE sSCOPE THIS TEST 
1369 ; 
1370 : TEST THAT THE CHARACTER 255 
1371 :CAN BE DETECTED IN CHARACTER 
1372 :DETECT ADDRESS 13 
1373 : 
1374 ; TEST 20 
1375 5 [eeRHRA eee eeKeeeeeeeeettteranKeKeKteKeeeReneNaKaanaeeeasenasersessee 
1376 004124 012737 000020 001226 TST20: MOV #20,TSTNO 
1377 004132 012737 004154 001216 MOV MTST21,NEXT 
1378 004140 012737 000013 013042 MOV #13,ADDR ;LOAD THE ADDRESS 
1379 004146 004737 004314 JSR PC,CHK.ADD :GO AND LOAD THE CHARACTER. 





| 2 
| CZDQF —MACY11 30(1046) O5=MAY=81 14:18 PAGE 29 
¢ tO OFF P11. 05=MAY=81 09:27 PROGRAM INITIALIZATION AND START UP. SEQ 0028 
| 1380 004152 104400 SCOPE :SCOPE THIS TEST 
| 1382 
| 1383 ;TEST THAT THE CHARACTER 255 
1384 AN BE DETECTED IN CHARACTER 
1385 OETECT ADDRESS 14 
1386 
1387 ; TEST 51 
1388 LRERAARRARERRERREREREERERERERRARERRRERRRRERRERRRARRARAEAERERER REREAD 
1389 004154 012737 000021 001226 1ST21: MOV #21 ,TSTNO 
1390 004162 012737 004204 001216 MOV #TST22,NEXT 
1391 004170 012737 000014 013042 MOV #14,ADDR sLOAD THE ADDRESS 
1392 004176 004737 004314 JSR PC, CHK. ADD ‘GO AND LOAD THE CHARACTER. 
1393 004202 104400 SCOPE ‘SCOPE THIS TEST 


‘TEST THAT THE CHARACTER 255 
SCAN BE DETECTED IN CHARACTER 
“DETECT ADDRESS 15 


TEST 22 


SRR EE AREER EEEEREREERRERREEEEREEREHERHEEEE 


012737 000022 001226 TST22: MOV #22, TSTNO 


012737 004234 001216 MOV ATST23,NEXT 

012737 000015 013042 MOV #15,ADDR ;LOAD THE ADDRESS 

004737 004314 JSR PC, CHK.ADD :GO AND LOAD THE CHARACTER. 
104400 SCOPE sSCOPE THIS TEST 


‘TEST THAT THE CHARACTER 255 
“CAN BE DETECTED IN CHARACTER 
“DETECT ADDRESS 16 


: TEST 23 


REE EERE REE ERE REAAEEEEREEEREAREEERRHEEREEEREE 


012737 000023 001226 TST23: MOV #23, TSTNO 


012737 004264 001216 MOV ATST24 NEXT 

012737 000016 013042 MOV #16,ADDR ;LOAD THE ADDRESS 

004737 004314 JSR PC,CHK.ADD 7GO AND LOAD THE CHARACTER. 
104400 SCOPE SSCOPE THIS TEST. 


STEST THAT THE CHARACTER 255 
[CAN BE DETECTED IN CHARACTER 
SDETECT ADDRESS 17 


: TEST 54 


PPPS SESSSEESESSLESE ESSE SESE SERRE ER RE RES E ERS R RRR SRR RRR RRR AR AAR RRR R SS 


012737 000024 001226 TST24: MOV #24,TSTNO 

012737 004562 001216 MOV MTST25,NEXT 

012737 000017 013042 MOV #17,ADDR ;LOAD THE ADDRESS 

004737 004314 JSR PC,CHK.ADD 3GO AND LOAD THE CHARACTER. 
104400 SCOPE :SCOPE THIS TEST 


HK g 
104413 MEMCLR sCLEAR ALL THE DQ11 REGISTERS. 
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015714 
174704 


001226 
001216 


174562 


174546 
174542 
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PROGRAM INITIALIZATION AND START UP. SEQ 0029 


3$: 


MOVB ADDR ,@DQRCSH ;LOAD THE CHAR DET ADDRESS TO BE USED. 

CLR DETCAR [CLEAR WORKING LOC. 

MOVB #255,DETCAR+1 :LOAD THE CHARACTER TO BE DETECTED IN WORKING AREA. 
MOV #255 ,GDCHAR SLOAD FOR ERROR PRINTOUT 

MOV COUNT ,R2 [EIGHT SHIFTS FOR EIGHT BITS (NO VRC) 


CLRB @DQREG ;SEL_ THE RX BA PRI. 
MOV WRXBUFF ,@DQSEC LOAD IT 

INCB @DQREG ;SEL THE RX WC PRI. 
MOV #-1 ,aDQSEC ;SET FOR ONE CHAR. 


sSELECT THE CHARACTER DET REGISTER. 
MOV DETCAR. + eg 7SET THE CHARACTER TO BE DETECTED INTO DQ11 CHAR DET REG 


MOVB #14,aD0 SELECT THE SEQUENCE REGISTER 
MOV maift5e61 13, aDasec SET SINGLE CHAR DET AND SINGLE CHAR DET FLAG SE 
MOVB #12, aDQREG 7SELECT THE misc REGISTER 


MOV #4012, aDQSEC ;SET EIGHT BITS TEST LOOP AND AUTO STEP 

BIS #B1T12+B1T0, @DORCSR SET RX ACTIVE AND RX GO. 

MOV DETCAR,T ;MOVE THE CHAR TO BE DET TO WORKING AREA 
COMB TEMP +1 ; COMPLEMENT CHAR FOR USE ON BIT WINDOW. 


BIC #B1T7,aDQSEC zI1F BIT WINDOW SET ON LAST PASS CLEAR IT! 
ROR TEMP ZSHIFT OUT BIT OF DATA. 
MOV TEMP ,R3 TSAVE IT 


BIC #°C<BIT7>.R3. «CLEAR ALL UNWANTED BITS 
BIS R3, aDQSEC ‘PLACE DATA ON BIT WINDOW. 


INC aDQSEC SCLOCK UP 

DEC aDQSEC ;CLOCK DOWN 

DEC R2 31S CHARACTER DONE YET? 
BNE 3$ ;BR IF NOT DONE 

TST @DOQRCSR WAS CHAR REALLY DETECTED? 
BMI .+4 :BR IF GOOD 

HLT 2 ; CHARACTER DETECT FAILED. 


MOV @DORCSR, TEMP 7GET THE RECEIVER CSR. 

BIC #*C<7400>,TEMP ;CLEAR ALL BUT CHARACTER DET. ADDR. 

CMPB ADDR, TEMP+1 :WAS THE CHARACTER REALLY DETECTED 
IN ADDRESS $A ?? 


HLT e ; WRONG ADDRESS. 


TTEST OF RECEIVER AND TRANSMITTER ‘SET ‘'T’’ *’ 

[TEST OF BIT ONE OF SEQUENCE REGISTER. 

STHIS TEST WILL ‘'SET T’’ AND THEN WILL 

[SEND A CHAR WHICH WILL ASET DONE CLEAR GO"'; IF 

REALLY IN TRANSPARENT MODE THE CHAR WILL NOT BE DETECTED 
SAND THE WORD COUNTS WILL GOTO ZERO. 


TEST 35 


REE ERE EEEEREERREREEAEEEEEEARAAEREARAREARREERR EH EEEe 


TST25: 


2$: 


MOV #25,TSTNO 
MOV ATST26,NEXT 


JSR PC,SET 7SET UP ALL NECESSARY FOR TEST. 
MOV Wai tiesBiT1, adasé C 


DBL. CHAR AND SET T 
DECB tpt ‘ELECT ADD 16 (8) 
MOVB #10, aDQREG SELECT CHAR DET. ADDRESS 


MOV #351400, @DOSEC :LOAD THE CHARACTER. SET DONE CLEAR GO. 


_ 


PROGRAM INITIALIZATION AND START UP. 


#14 ,aDQREG 


#BIT15+BI1T7, 


#TXBUFF ,RO 
(PC)+,(RO)+ 
000, 350 
(PC) +,(RO)+ 
351,200 

PC, ENABLE 
#1,aDQREG 
ar ee 


3 

#3, aDQREG 
aDQseEc 
.+4 

3 


SELECT THE SEQ REGISTER. 
aDQSEC 


SET FUNCTION. 7: GO SET DONE. 
SPREPARE TX BUFFE 
Hert THE BUFFER WITH DATA 


;DAT 
LOAD THE BUFFER WITH DATA 


tSET GO BITS FOR RX AND TX; WAIT FOR RX DONE. 
TGET THE RX WC PRI. 
iRX WC PRI. SHOULD =0 
BR IF RX WC PRI =0 
“RX PRI WC NOT =0 
;GET TX WC PRI. 
;TX WC PRI SHOULD =0 
sBR IF TX WC =0 
7TX WC PRI NOT =0 


STEST OF RECEIVER ‘'CLEAR ''T’’ *' 
TEST OF BIT TWO OF SEQUENCE REGISTER. 
THIS TEST WILL ENTER BOTH THE RECEIVER AND 


; TRANSMITTER INTO TRANSPARENCY ; 


[WHICH SAYS "'CLEAR RX 


THEN A CHARACTER 


T’’ WILL _BE SENT FOLLOWED 


jBY A CHARACTER WHICH SAYS ‘'SET RX CHAR FLAG'' 
THE TEST THEN CHECKS THAT THE CHARACTER FLAG IS SET 
[WHICH MEANS THAT CHARACTER WAS DETECTED. 


ERE KERR REE KEE EKER EEE EKER REE EH 


| CZDOF —MACY11_30(1046) O5-MAY=81 14:18 PAGE 31 
 CZDOFF.P11 05=MAY=81 09:27 
1492 004630 112777 000014 174532 MOVB 
1498 004636 012777 100200 174526 MOV 
——- 1495 004664 012700 012014 MOV 
1496 004650 012720 MOV 
| 1497 004652 350 RYTE 
1498 004654 012720 MOV 
1499 004656 351 2 BYTE 
1500 004 737 011620 JSR 
/ 1501 004 112777 000001 174476 MOVB 
| 1502 004672 005777 174474 TST 
1503 004676 001401 BEQ 
1504 004700 104003 HLT 
1505 004702 112777 000003 174460 MO 
506 006710 005777 174456 TST 
1507 004714 001401 BEQ 
1508 004716 104003 HLT 
1509 004720 104400 SCOPE 
1510 
1511 
1512 
1513 
1514 
1515 
1516 
1517 
1518 
1519 
1520 
1521 
1328 : TEST 56 
1524 004722 012737 026 001226 TST26: MOV 
1525 004730 012737 005072 001216 MOV 
1526 004736 737 011024 JSR 
1327 004742 012777 040002 174422 MOV 
1529 004750 105377 174406 DECB 
1530 004754 112777 000010 174406 MOVB 
1531 004762 012777 165000 174402 MOV 
1532 004770 112777 000014 174372 MOVB 
1333 004776 012777 040006 174366 MOV 
1535 005004 105377 174352 DECB 
1537, 005010 112777 000010 174352 MOVB 
1538 005016 012777 166400 174346 MOV 
1539 005024 112777 000014 174336 MOVB 
1340 005032 012777 120000 174332 MOV 
1542 005040 012700 012014 MOV 
1543 005044 012720 MOV 
1544 005046 350 351 BYTE 
1545 005050 012720 MOV 
1546 005052 352 355 BYTE 
1547 005054 004737 011620 JSR 


#26,TSTNO 
ATST27, — 
PC,SET 


SET UP ALL NECESSARY FOR TEST. 


wei tiesBiT1, aDasec 


oe tae 
#10, aDQREG 
#3550400, = 
#14,aDQR 


QSEC 


SET FUNCTION: DBL CHAR AND SET T 
[SELECT CHAR ADDRESS 16 (8) 
;SELECT CHAR DET ADDRESS. 

[LOAD CHARACTER 

SELECT THE SEQ REGISTER. 


WI Tie +BI 12, a@DaseC 


@DORCSH 


#10, aDORE 
#395400, Sp 
#14,a 


#TXBUFF ,RO 
(PC) +, (RO) + 
350, 351 
(PC)+,(RO)+ 
352, 355 

PC, ENABLE 


QSEC 


QREG 
#11 15¢B1T13, asec 


SET FOR DBL CHAR AND CLEAR T 
;GET NEXT ADDR 

ZGET NEXT ADDRESS 

SELECT oe DET ADDRESS 
[LOAD CHARACTER 

;SELECT THE SEQ "REGISTER. 


T FOR SINGLE CHAR AND SET FiAG. 
GET POINTER 

‘BATA THE BUFFER WITH DATA 

[LOAD THE BUFFER WITH DATA 


[DATA 
7SET GO BITS FOR RX AND TX; WAIT FOR RX DONE. 


SEQ 0030 


| CZ7DGF MACY11 30(1046) 
CZDQFF P11 OS-MAY=81 


1548 005060 AGO 
1549 005064 100401 

50 005066 104004 
51 005070 104400 


566 005072 012737 
567 (005100 ah fe i 


00473 
1569 0051i2 012777 
1570 
1571 005120 112777 
| 


1601 005316 
1602 005320 013703 
1603 005324 1 


05=MAY=81 
09:27 
174274 
00027 001226 
005350 001216 
011024 
100010 174252 
000017 174242 
000200 174236 
000003 174226 
177576 174222 
012014 
012215 
012014 
22 
000225 013036 
010 013040 
174154 
012216 174150 
001 174140 
177775 174134 
0004 174124 
012236 174120 
0C5 174110 
177577 174104 
011674 
013040 
013036 
013040 


14:18 PAGE 


_ 


32 
PROGRAM INITIALIZATION AND START UP. 


TST @DOQRCSR ;CHECK CHAR DET FLAG 

BMI -*4 ;BR IS SET 

HLT 4 CHARACTER DET FLAG NOP SET 
SCOPE ;SCOPE THIS TEST 


“TEST OF RECEIVER AND TRANSMITTER ‘'BCC/CLEAR START"’ 

[TEST OF BIT THREE OF SEQUENCE REGISTER 

[THE TEST STARTS UP THE TRANSMITTER AND "RECEIVER BCC 

SAND DEPOSITS ONE CHARACTER INTO IT. THE RECEIVER 

; DONE FLAG COMES UP_AND THE DQ11 CLOCK IS STOPPED. 

:THE BCC'S OF BOTH THE TX AND RX ARE THEN ‘‘GRABBED'' 

SAND SHIFTED LCOKING FOR THAT ONE CHARACTER TO BE PRESENT 
IN THE BCC OF EACH RX AND TX BCC REGISTER. 


TEST 57 


REE KERR EERE RRER REE EEE EEE 


TST27: 


6$: 
7$: 


3$: 
8$: 


MOV #27,TSTNO 
MOV #TST30, or 


JSR PC,SET :SET UP ALL NECESSARY FOR TEST. 
MOV ‘oirissBIT3. aDasec 
:SET SNGL CHAR AND BCC/START CLEAR 
MOVB «#17, @DQREG “SEL THE POLY REG. 
MOV #200, aDQSEC ‘SET FOR LRC 8 
MOVB  #3,a@DQREG “SEL THE TX WC PRI. 
MOV #-202,aDQSEC SET FOR 202 (8) 
MOV #TXBUF F RO ‘GET TX BUFFER 
CLRB —- (RO) + “CLEAR ALL THE TX BUFFER 
CMP #TXBUFF+201,RO ALL CLEAR? 
BNE 1$ ‘BR IF NO 
MOV #TXBUF F RO ;GET TX BUFFER 
MOV (PC) +, (RO) + LOAD THE BUFFER WITH DATA 
.BYTE 350,225 “DATA 
MOV #225, CHAR “SET EXPECTED BCC CHAR. 
MOV #8. , COUNT “SET FOR 8 BITS 
CLRB aDQREG SSEL REC PRIMARY 
MOV #RXBUFF,Q@DQSEC :SET WITH START ADRS 
MOVB #1, aDOQREG *SEL REC CHAR COUNT 
MOV #5 ,adQseC ‘SET CHAR COUNT 
MOVB #4, @DQR sSEL REC SECONDARY 
MOV ARUP +20, aDasec “SET WITH SEC ADRS 
MOVB = #5, :SEL REC’ CHAR COUNT 
MOV 501, OBDeSEC ‘SET CHAR COUNT 
JSR PC ,NEWENA “SET GO BITS FOR RX AND TX; WAIT FOR RX DONE. 
Mov COUNT ,R3 ;GET CHAR SIZE 
cL 
ROLB ~—- RO ‘SHIFT RX BCC IMAGE 
ADC RO ‘PICK’ UP CARRY 
CMP CHAR, RO *CHECK BCC 
BEQ 3$ ‘BCC OK! 
DEC R3 TALL SHIFTS DONE? 
BNE 6$ BR IF 
HLT 5 [RX BCC HAS WRONG DATA. 
MOV COUNT ,R3 “SAVE COUNTER 


CLC : 


SEQ 0031 


t-— — ———— ee eS 


| G 3 
| CZDOF MACYT1 30(1046) O5=MAY-81 14:18 PAGE 33 


— C2DQFF P11 05=MAY=81 09:27 PROGRAM INITIALIZATION AND START UP. 
16046 005326 106101 ROLB R1 SHIFT TX BCC IMAGE 
| 1605 005330 005501 9$: ADC R1 PICK UP CARRY 
| 1606 005332 023701 013036 CMP CHAR ,R1 s1S BCC OK? 
1607 005336 001403 BEQ 5$ ;BR IF OK 
1608 005340 005303 DEC R3 sALL SHIFTS DONE? 
1 005342 001370 BNE 8$ ;BR IF NO 
1610 005344 104005 HLT 5 :TX BCC HAS WRONG DATA, 
1611 005346 104400 S$: SCOPE SCOPE THE TEST 


SEQ 0032 


DOF MACYT? 30(1046) 


CZ 
CZDQFF P11 


O5S=MAY=81 


0S=-MAY=81 09:27 


1623 005350 012737 


005364 0 
1626 005370 012777 
1628 005376 112737 


1632 005422 012777 


1634 005430 912737 
1635 005436 004737 


000030 


003721 
005446 


173706 
173706 
173702 


010000 


000001 
173660 


000001 


001226 
001216 


173774 
012016 
001220 
173742 


012426 


173664 


173662 


173634 


14:18 PAGE 34 
PRO 


GRAM 


TEST 


REE EEE EEE TREK REE REEKEREEREEEH REEERHEEEREEREEEEEEEEREE 


TST30: 


TEST 


seeeerercerecenrarengeerererenezenesernasarenaaeanaerasasasensaseneTs 


H 3 
INITIALIZATION AND START UP. 


STEST OF RECEIVER ‘CLEAR ACTIVE'' 
STEST OF BIT SIX OF SEQUENCE REGISTER. 


‘THIS TEST WILL SEND A CHARACTER WHICH SAYS ‘‘CLEAR RX ACTIVE"' 


‘THE PROGRAM WAITS FOR TX DONE THEN LOOKS AT RX ACTIVE 
‘WHICH SHOULD BE EQUAL TO ZERO; THEN THE PROGRAM LOOKS 
7FOR RX GO TO BE SET AND RX PRI DONE TO BE CLEAR. 

; [ALSO THE RX WC PRI SHOULD BE NOT EQUAL TO ZERO. 


50 


MOV #30,TSTNO 

MOV #TST31, + Sag 

JSR PC,SET 

MOV WBiT15¢Bi 16, aDasec 
SET SNGL CHAR AND CLEAR ACTV 

MOVB #350, TXBUFF+2 SET DATA IN TX BUFFER 

JSR PC,X.ABG :GO AND WORK THE DQ11 

MOV ee, TSET FOR RETURN IF SwO9=1 


JSR PC,EX >SET THING UP FOR DOUBLE CHAR.(16 BITS) 


MOV WBiT 1428116, apasec 
#SET DBI CHAR AND CLEAR ACTV 


MOV #3721,XTXBUF+2 ;LOAD THE DATA 

JSR PC,X.ABG :WORK DQ11 
SLOCK* eoenecece==—= 

SCOP1 y1F SWO9=1; THEN GOTO ADDRESS IN *LOCK"’. 
SCOPE ys THIS TEST 

INC @DORCSR SET RX GO. 

INC aDQTCSR SET x GO 

TSTB aDQTCSR [HANG HERE FOR TX PRI DONE! ! 
BPL 74 :BR IF NOT DONE . 

CMP (SP) , (SP) WAIST TIME! 

BIT #BITI2,aDQRCSR :1S RX ACTIVE CLEARED? 

BEQ +4 :BR IF YES 


HLT 6 [RX ACTIVE NOT CLEARED 
MOVB #1, @DQREG “GET THE RX WC PRI. 
TST aDQSeC :IT SHOULD BE NON-ZERO! ! 


BNE .*4 :BR 

HLT 6 zRX PRI WC =0 

CMPB #001, aDQRCSR :GO SHOUL D BE SET AND DONE NPT SET. 
BEQ . +4 [BR IF OK! 

HLT 6 LOW BYTE RXCSR NOT =001 

RTS PC : 


“TEST OF RECEIVER AND TRANSMITTER “‘CLEAR GO/SET DONE** 
TEST OF BIT SEVEN OF SEQUENCE REGISTER 

SCHARACTER "'SET DONE/CLEAR GO" IS SENT AND IS DETCETED 
[BY BOTH THE TX AND RX. WHEN RX DONE SETS; oa PROGRAM 
7 VERIFIES THAT BOTH THE TX AND RX WC (PRI) ARE NOT 
*EQUAL TO ZERO AND THAT PRI DONE SET,GO IS CLEARED, 
AND PRI/SEC BIT IS CLEARED. 


51 


SET UP ALL NECESSARY FOR TEST. 


SEQ 0033 


[oe 


se 


CZ7DQF 
CZDQFF P11 


1706 


SSS 


er a ee ee 
NNNNNNNNN NNN NO 
2 SH 


MMP 
Wr 


MACY11 30(1046) 
81 


WONAUEWN-O 
Ww 
™N 
™ 
oa 


8 
$ 


OS=MAY= 


012737 
012737 
737 


004 
012777 


004 
012777 
012737 


012737 
004737 


012737 


012777 


012700 
012710 


005762 350 


004737 


I 3 


PROGRAM INITIALIZATION AND START UP, 


#31, TSTNO 
#TST32,NEXT 
PC,SET.UP :SET UP ALL NECESSARY FOR TEST. 
#81T15+B1T7, aDQSEC 
:SET SNGL CHAR AND SET DONE CLEAR GO 
#TXBUFF +2,RO0 ZSET TX BUFFER 
(PC) +, (ROD ‘LOAD WITH DATA 
350,352 “DATA 
PC,X.ABF ‘WORK DQ11 
#1$,LOCK ‘SET FOR RETURN IF SWO9=1 


PC,EXT.UP ‘SET THING UP FOR DOUBLE CHAR.(16 BITS) 
#81114+BIT7, aDOSEC 

;SET DBL CHAR AND SET DONE CLEAR GO 
#3721,XTXBUF+2 =LOAD DATA 

#12525 ,.XTXBUF +4 = SAME 


OS=MAY-81 14:18 PAGE 35 
09:27 

000031 001226 TST31: MOV 
005726 001216 MOV 
011024 JSR 
100200 173612 MOV 
012016 MOV 
MOV 

352 -BYTE 
5640 JSR 
005602 001220 MOV 
011236 1$: JSR 
040200 173556 MOV 
003721 012426 MOV 
012525 012430 MOV 
00564 JSR 

j= *LOCK®* 

SCOP1 

SCOPE 
011620 X.ABF: JSR 

000001 173516 MOVB 
173514 TST 
BNE 
HLT 

000003 173500 MOVB 
173476 TST 
BNE 
HLT 

000200 173452 CMPB 
BEQ 
HLT 

000200 173444 CMPB 
BEQ 
HLT 
RTS 


PC ,X.ABF ; TURN ON DQ11 
sIF SwO9=1; THEN GOTO ADDRESS IN ‘LOCK"’. 
;SCOPE THIS TEST. 

PC, ENABLE :SET GO BITS FOR RX AND TX; WAIT FOR RX DONE. 

#1, aDQREG sSEL RX WC PRI 

aDQSEC ;1T SB NON-ZERO 

+4 ;BR IF OK 

7 sRX PRI WC = 

#3, aDQREG sSEL THE TX WC PRI 

aDQSEC ;1T SB NON-ZERO 

+4 ;BR IF OK. 

3T™X WC PRI IS =0 

#200, aDQRCSR ;DONE=1; P/S=0; GO=0? 

+4 ;BR IF OK. 

T 7zRx CSR NOT =200 (PRI DONE) 

#200, aDQTCSR ;DONE=1; P/S=0; GO=0 

*4 ;BR IF OK. 

oe :TX PRI DONE SET? (TX CSR=200) 


TEST OF RECEIVER ‘CHARACTER STRIP*' 

TEST OF BIT EIGHT OF SEQUENCE REGISTER. 

; THE CHARACTER THAT IS SENT AS ‘'CHARACTER STRIP** IS 
;LOOKED FOR IN THE RX BUFFER; IF IT IS NOT FOUND so 


POP RESESSSSELCESE SESE SEER SEES ESSE EERE SESE REAR SARE SARA RRA RRA ARRAS ASAE SD 


TEST 32 

000032 001226 1ST32: MOV 
006104 001216 MOV 
011024 JSR 
100400 173416 MOV 
012016 MOV 
MOV 

321 BYTE 

011620 JSR 


#32,TSTNO 
#TST33,NEXT 
PC,SET.UP sSET UP ALL NECESSAR FOR TEST. 
#81715+B1T8, aDOSEC 
;SET SNGL CHAR AND CHAR STRIP. 
#TXBUFF+2,RO :SET POINTER 
(PC) +, (RO) sLOAD THE 
350, 321 : DATA 
PC, ENABLE ‘SET GO BITS FOR RX AND TX; WAIT FOR x DONE. 


SEQ 0034 


CZDQF  MACY11 30(1046) O5-MAY=81 14:18 PAGE 36 

| C2DQFF.P11 05=MAY=81 09:27 PROGRAM INITIALIZATION AND START UP. 

1724 005770 012700 012216 MOV #RXBUFF RO :GET THE RX BUFFER 

1725 005774 012701 000010 MOV #10,R1 ‘SET FOR 10(8) CHARS 

| 17286 122720 SOOsso 1$: CMPR ss #350, (RO) + “WAS THE CHAR STRIPPED? 

| 1727 006004 001001 BNE +4 ‘BR IF NOT FOUND YET 
1728 006 104010 HLT 10 ‘CHARACTER NOT STRIPPED FROM CORE. 
1729 006010 005301 DEC R1 :ADJUST CHAR COUNTER 

/ 1730 006012 001372 BNE 1$ ALL DONE? 
1731 006014 012737 022 001220 MOV #23, LOCK CET FOR RETURN IF SwO9= 
1732 006022 004737 011236 2$: JSR PC EX ‘SET THING UP FOR pOUeLE CHAR. (16 BITS) 
1733 006026 012777 040400 173336 MOV wmitiesb118, apaséC 
1734 SET DBL —" AND CHAR STRIP. 
1735 006034 012737 003721 012430 MOV #3721,XTXBUF+4 LOAD DATA 
1736 006042 012737 005672 012432 MOV #5672.XTXBUF +6 : SAME 
1737 006050 004737 011620 JSR PC, ENABLE “SET GO BITS FOR RX AND TX; WAIT FOR RX DONE. 
1738 006054 012700 012216 MOV #RXBUF F RO ‘GET POINTER 
1739 012701 000010 MOV #10,R1 ‘SET CHAR COUNT. 
1740 006 022720 003721 3$: CMP #3721, (RO)+ ‘CHAR STRIPPED? 
1741 006070 001001 BNE +4 *SO FAR SO GOOD 
1742 006072 104010 HLT i0 “CHARACTER NOT STRIPPED FROM CORE 
1743 006074 005301 DEC R1 TALL DONE 
1744 006076 001372 BNE 3$ ‘BR IF NO. 
1745 j--o-- *LOCK*® <<<<-<<<<s---- 
Ns 006100 104401 SCOP1 sIF SwWO9=1; THEN GOTO ADDRESS IN “COCK. 
1748 006102 104400 SCOPE ; 
1749 
1750 
1751 
1752 “TEST OF “TRANS PAD" 
1753 “TEST OF BIT TEN OF SEQUENCE REGISTER 
1754 ‘THE PAD CHARACTER IS SENT IN THE MIDDLE OF THE MESSAGE 
1755 SAND THE PROGRAM VERIFIES THAT THE PAD WASN'T INSERTED 
1756 “IN THE MIDDLE OF THE RX BUFFER. 
1757 
1758 TEST $3 
1759 FERRARA EEE E AERA ERARA RARER AAR AREA ERATE ERE EE EES 
1760 006104 012737 000033 001226 TST33: MOV #33, TSTNO 
1761 006112 012737 006260 001216 MOV #TSi 34. NEXT 
1762 006120 737 011024 JSR C,S :SET UP ALL NECESSARY FOR TEST. 
1763 006124 012777 102000 173240 MOV witissBIT10. aposec 
1764 ; ZSET SNGL CHAR AND TX PAD 
1765 006132 012700 012016 MOV WTXBUFF+2,RO = LOAD THE 
1766 006136 012710 MOV (PC) +, (RO) : A 
1767 006140 350 101 -BYTE 350,101 INTO THE TX BUFFER 
1768 006142 004737 011620 JSR PC, ENABLE “SET GO BITS FOR RX AND TX; WAIT FOR RX DONE. 
1769 006146 012700 012216 MOV #RXBUF F ,RO ‘GET POINTER 
1770 006152 012701 000010 MOV #10,R1 *SET CHAR COUNT 
1771 006156 122720 000377 1$: CMPB ss: #377, (RO) + “PAD PRESENT? 
1772 006162 001001 BNE +4 “BR IF NO 
1773 006164 104011 HLT 11 “PAD CHARACTER IS IN BUFFER. 
1774 006166 005301 DEC R1 TALL CHAR DONE? 
1775 006170 001372 BNE 1$ ‘BR IF NO. 
1776 006172 012737 006172 001220 28: MOV #2$,LOCK “SET FOR RETURN IF SWO9= 
1777 006200 004737 011236 JSR PC,EXT.UP ‘SET THING UP FOR DaUOLE CHAR. (16 BITS) 
1778 006204 012777 042000 173160 MOV #81114+B1T10, aDOSEC 
1779 =SET DBL CHAR AND TX PAD 


i 3 


SEQ 0035 
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_" 
~S 
Co 
Ww 
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& oo ~ ~ 
SS SISIISLELLIISEF 
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MACY11 30(1046) 
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0S-MAY-81 
012737 


260 012737 
66 


012737 
004737 
012777 


105377 


012777 


342 112777 


OS=MAY-81 14:18 PAGE 37 
09:27 PROGRAM INITIALIZATION AND START UP. 
003721 012426 MOV #3721,XTXBUF+2 ;LOAD DATA 
054321 012430 MOV #54321, XTXBUF +4 = SAME 
01162 JSR PC, ENABLE “SET GO BITS FOR RX AND TX; WAIT FOR RX DONE. 
012216 MOV #RXBUT F RO ;GET POINTER 
000010 MOV R1 °GET CHAR COUNTER 
177777 3$: CMP nen, (RO)+  :TX PAD IN BUFFER? 
BNE ‘BR IF NO 
HLT 1" ‘PAD CHARACTER IS IN BUFFER. 
DEC R1 “ALL CHARS DONE? 
BNE 3$ ‘BR IF NO. 
4$: SCOPE ; 
“TEST OF ‘BCC EXCLUDE"’ 
‘TEST OF BIT 11 OF SEQUENCE REGISTER 
"BCC EXC CLUDE IS EXERCIZED ON BOTH THE RX AND TX TOGETHER 
THE BCC IS TURNED ON AND THEN A CHARACTER IS EXCLUDED 
‘FROM THE acts WHEN DONE COMES UP THE BCC'S OF BOTH 
‘THE RX AND TX ARE SHIFTED AROUND TO SEE IF THE 
* CHARACTER WAS REALLY EXCLUDED. 
TEST 54 
Pia leRalielial SMe HH TI ITI TTT TITRE KEKE ER EEE EEE EREKEKEH 
000034 001226 TST34: MOV #34, TSTNO 
006600 001216 MOV #1ST35, NEXT 
011024 JSR PC, SET :SET UP ALL NECESSARY FOR TEST. 
100010 173064 MOV Suit SebIT3, adaséc 
SSET SNGL CHAR AND BCC START CLEAR 
173050 DECB aparcsh ‘SEL CHAR ADD 16(8) 
000010 173050 VB #10, aDQREG “GET CHAR DET ADDRESS 
170400 173044 MOV #3619400, @DQSEC :LOAD CHAR. 
000014 173034 MOVB  #14,aDQREG “SEL SEQ REG 
104000 173030 MOV #81T15+B1T11, aDQSEC 
=SET SNGL CHAR AND BCC EXCLUDE 
000017 173020 MOVB #17, @DQREG ‘SEL POLY REG. 
000200 173014 MOV #200, aDQSEC SET LRC 8 
000003 173004 MOVB  #3,@DQREG SEL TX WC PRI. 
177576 173000 MOV #-202,aDQSEC  :SET BIG NUMBER 
012014 MOV #TXBUFF ,RO :SET POINTER 
1$: CLRB (RO) + LOAD DATA 000 
012215 CMP #TXBUFF+201,R0 :CLEAR BUFFER! ! 
BNE 1$ IF NOT ALL CLEAR 
012014 MOV #TXBUFF ,RO ‘SET POINTE 
MOV (PC) + (RO) ‘LOAD THE 
107 .BYTE 350,107 ; 
000361 012016 MOVB #361, TXBUFF +2 ; 0 
000010 013040 MOV #8. COUNT THE TX BUFFER! 
107 013036 MOV r107. CHAR ‘SET FOR g BITS AND 107 AS THE CHAR IN BCC. 
172726 CLRB aDOREG 'SEL REC PRIMARY 
012216 172720 MOV WRXBUFF,@DQSEC :SET WITH START ADRS 
001 172710 MOVB #1, @DQREG ‘SEL REC CHAR COUNT 
177775 172704 MOV #5 adQse ‘SET CHAR COUNT 
000004 172674 MOVB  #4,@DQR 7SET REC SECONDAR 
012236 172670 MOV oniaeT 230, aDasec SET ITN SEC ADRS 


K 3 


SEQ 0036 


——_ 


| 
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| CZDQFF.P11 «= 05=MAY=81 09:27 PROGRAM INITIALIZATION AND START UP. SEQ 0037 
| 1836 006502 112777 000005 172660 MOVB #5, aDQREG :SEL CHAR COUNT 
1837 006510 012777 177577 172654 MOV. #=301-aDGSEC «SET CHAR COUNT 
1838 006516 004737 011674 JSR PC,NEWENA SET GO BITS FOR RX AND TX; WAIT FOR RX DONE. 
/ 1839 006522 «013703 +013040 MOV COUNT ,R3 ; SAVE COUNTER 
1840 006526 000241 4$: CLC 
1841 006530 106100 ROLB = RO “SHIFT RX BCC IMAGE 
1842 006532 005500 58: ADC RO + SAV VE CARRY 
1843 006534 023700 013036 CMP CHAR, RO ‘BCC OK? 
1844 006540 001403 BEQ 3$ ‘BR IF OK 
1845 006542 005303 ‘ DEC R3 ;ALL SHIFTS DONE? 
1846 006544 001370 BNE 4$ “BR IF NO 
1847 006546 104012 HLT 12 “RX BCC HAS WRONG DATA. 
1848 006550 013703 013040 3$: MOV COUNT ,R3 
1845 006554 000241 6s: CLC ZCLEAR CARRY 
1850 006556 106101 ROLB sR? ‘SHIFT TX BCC IMAGE 
1851 006560 005501 ADC R1 “PICK UP CARRY 
1852 006562 023701 013036 CMP CHAR,R1 ‘BCC OK? 
1853 006566 001403 BEQ 7$ ‘BR IF OK. 
1854 006570 005303 DEC R3 TALL SHIFTS DONE? 
1855 006572 001370 BNE 6$ <BR IF NO 
1856 006574 104012 HLT 12 “TX BCC HAS WRONG DATA. 
1857 006576 104400 7$: SCOPE “SCOPE THIS TEST 
He 
1860 “TEST OF SET TRANSPARENCY FOR TRANSMITTER. 
1861 ‘TEST THAT THE SEQ FUNCTIONS ARE ALLOWED IF 
1862 “THEY ARE PRECEEDED BY *DLE*. 
1863 S THIS TEST THAT WHEN THE TRANSMITTER FLIPS re PRI TO SEC 
1864 ‘AND "EXIT T'' IS ASSERTED THAT THE TX SENDS A ‘DLE’ 
1865 ; CHARACTER. 
1866 : 
1867 ; TEST 35 
1868 RRA EE AAA RARAEERERAARERR ERE ERROR SS 
1869 006600 012737 000035 001226 1ST35: MOV #35, TSTNO 
1870 006606 012737 007054 001216 MOV #15136, NEXT 
1871 006614 004737 011024 JSR PC,SET :SET UP ALL NECESSARY FOR TEST. 
1872 006620 012777 040002 172544 MOV SoiriessIT1. adaséc 
1873 :SET DBL CHAR AND SET T 
1874 006626 105377 172530 DECB aDORCSH “SEL CHAR ADD 16 
1875 006632 112777 000010 172530 MOVB #10, aDQREG ‘GET CHAR DET REG 
1876 006640 013700 001372 MOV DOSEC,RO ; 
1877 006644 012710 MOV (PC) +, (RO) sLOAD THE REGISTER 
1878 006646 352 352 .BYTE 352, 352 ‘WITH THIS DATA 
1879 006650 112777 000014 172512 MOVB #14. aDQREG “SEL THE SEQ REG. 
1880 006656 012777 101000 172506 MOV wltis*Bit9. apaséc 
1881 ;SET SNGL CHAR AND DLE 
1882 105377 172472 DECB ry :SEL CHAR ADD 15(8) 
1883 006670 112777 000010 172472 MOVB 3s #10 @ ‘GET CHAR | ADDRESS 
1884 006676 012777 166000 172466 MOV #3549400; S00seC ‘LOAD WITH 
1885 006704 112777 000014 172456 MOVB = #14, “SEL THE Seo. REGISTER 
1886 006712 012777 100200 172452 MOV waitiseBii7. aposéc 
1887 :SET SNGL CHAR AND SET DONE CLEAR GO 
1888 006720 112777 000003 172442 MOVB #3, @DQREG “SEL THE TX WC PRI. 
1889 006726 012777 177772 172436 MOV #~6, aDOSEC “SET FOR 6 CHARS 
1890 006734 112737 000350 012015 MOVB  #350,TXBUFF+1 LOAD 
1891 006742 112737 000357 012020 MOVB  #357.TXBUFF#4  : DATA 





. 
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| CZDQFF.P11 05=MAY=81 09:27 PROGRAM INITIALIZATION AND START UP. | SEQ 0038 
| 1892 006750 112737 000354 012054 MOVB #354, TXBUFF+40 ;EXIT T SHOULD SEND DLE TTIS SHOULD SET DONE THEN!! 
| 1893 006756 112777 000006 172404 MOVB  #6,aDQREG sSEL TX BA SEC. 
| 1894 006764 012777 012054 172400 MOV #TXBUF F +40 , aDOSEC 
1895 006772 105277 172372 INCB @DOREG LOAD BA AND SEL WC SEC. 
1896 006776 052777 030000 172362 BIS eI sB1T12, apoéRR 
1897 ;SET WRITE ENABLE AND EXiT T 
1898 007004 012777 177770 172360 MOV #-10,aDQSEC “SET SEC. FOR 10(8) CHAR 
1899 007012 004737 011620 JSR PC ENABLE :SET GO BITS FOR RX AND Tx: WAIT FOR RX DONE. 
1900 007016 112777 000007 172344 MOVB  #7,a@DQREG >SEL THE TX WC SEC. 
1901 007024 005777 172342 TST aDaSEC *SHOULD BE NON-ZERO. 
1902 007030 001001 BNE +4 ‘BR IF OK. 
1903 9007032 104003 HLT 3 :TX DID NOT DET ''SET DONE CLEAR GO"' 
1904 007034 112777 000001 172326 MOVB #1, aDQREG *SEL THE RX WC P 
1905 007042 005777 172324 TST aDQSEC ‘RX WC PRI S/B NOT=0 
1906 007046 001001 BNE +4 ‘BR IF OK 
1907 007050 104003 HLT 3 *RX NOT DET CHAR SET DONE CLEAR GO. 
1908 007052 104400 SCOPE sSCOPE THE TEST. 
1909 
1910 
1911 a4 
1912 
1913 
1914 “TEST THAT THE TRANSMITTER WILL EXIT T 
1915 ‘WHEN ENTERED BY ‘'SET T*’ 
1916 
1917 : TEST 56 
1918 ERRATA AEE REE EERE REET A TTS 
1919 007054 012737 000036 001226 TST36: MOV #36, TSTNO 
1920 007062 012737 007260 001216 MOV #TST37, NEXT 
1921 007070 004737 011024 JSR PC,SET :SET UP ALL NECESSARY FOR TEST. 
1922 007074 012777 040002 172270 MOV eeiTieseiTt. aDaséc 
1923 ;SET DBL CHAR AND SET T 
1924 007102 105377 172254 DECB apo RCSH *GET CHAR ADDR Ned) 
1925 007106 112777 000010 172254 MOVB #10,a “GET CHAR REG. 
1926 007114 012777 166000 172250 MOV m35%9400, Sp0sec ;LOAD CHARACTER 
1927 007122 112777 000014 172240 MOVB  #14,aDQREG SEL THE SEQ REG. 
1928 007130 012777 100200 172234 MOV #B1T15+BIT7, aposéc 
1929 ;SET SNGL CHAR AND SET DONE CLEAR GO. 
1930 007136 112777 000006 172224 MOVB  #6,aDQ sSEL TX BA SEC. 
1931 007144 012777 012054 172220 MOV ATABUFF +40, aDasec 
1932 007152 105277 172212 INCB aDOR sSEL TX WC SEC. 
1933 007156 052777 030000 172202 BIS oer $+B1T12, @DQERR 
1934 sSET WRITE ENABLE we EXIT T 
1935 007164 012777 177770 172200 MOV #-10,aDQSEC =SET FOR 10((8) C 
1936 007172 112737 000350 012017 MOVB  #350.TXBUFF+3  :LOAD DATA 
1937 007200 112737 000354 012055 MOVB  #354.TXBUFF+41 SAME 
1938 007206 005277 172152 INC apaTCSR :SET TX GO. 
1939 007212 032777 000100 172144 1$: BIT #B1T6,aDQTCSR ; HANG HERE FOR TX SEC. DONE. 
1940 007220 001774 BEQ 1$ BR IF NOT DONE 
1941 007222 112777 000003 172140 MOVB  #3,aDQREG “GET TX WC PRI. 
1942 007230 005777 172136 TST aDQSEC ‘IS IT =0 
1943 007234 001401 BEQ +4 ;BR IF OK 
1944 007236 104003 HLT 3 :TX wC PRI NOT=0 
1945 007240 112777 000007 172122 MCVB #7, a@DQREG =SEL TX WC SEC 
1946 007246 005777 172120 TST aDOSEC 71S NOT =0? 
1947 007252 001001 BNE +4 :BR IF OK 
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HLT 3 77 SEC WC S/B NON-ZERO: 
SCOPE ;SCOPE THIS TEST. 


14:18 PAGE 40 


sTEST THAT THE RECEIVER STRIP SYNC IS 
‘ INHIBITED WHEN IN TRANSPARENT MODE. 


TEST 37 
SRRARRRRERERERREREREREEEREERERRAEARERERARRAEERERERERARRRARRERRERER ENS 
1ST37: MOV #37, TSTNO 

MOV #TST4O,NEXT 
JSR PC,SET.UP :SET UP ALL NECESSARY FOR TEST. 
MOV #B1T14+BIT1, abasé¢ 

SET DBL CHAR AND SET T 


* DECB QDOQRCSH TSEL CHAR ADD 16(8) 
MOVB #10, aDQREG # SEL CHAR REG 
MOV DQSEC,RO 
MOV (PC) +, (RO) ZLOAD THE CHAR 
«BYTE 101,101 
MOVB #14 ,aDQREG SEL THE SEQ REG 


MOV #81715+B1T9, aDQseC 
;SET SNGL CHAR AND DLE 
MOVB #350,TXBUFF+1  ;LOAD BUFFER 
MOV #TXBUF F +2,RO 3 
1$: MOVB #107, (RO)+ DLE 
MOVB #26, (RO)+ 7 SYNC 
CMP nn KEEP STUFF ING 


BNE 
MOV #3,aDQRCSR SET iy SYNC AND GO(RX) 
INC @DQTCSR SSET T 
a a ais ; HANG NERE FOR RX DONE (P) 
L eq 
MOV #RXBUF F ,RO “GET RX POINTER 
CMPB #0, (RO) + sFIRST CHAR S/B=0 
BEQ +4 4 
HLT 3 sFIRST DATA CHAR WRONG 
CMPB #350, (RO)+ ;NEXT CHAR S/B=350 
BEQ +4 3 
HLT 3 zRX BUFFER WRONG 
23: CMPB #101, (RO)+ zDLE PRESENT? 
BEQ +4 3 
HLT 3 ZDLE NOT THERE 
CMPB #26, (RO)+ sSYNC PRESENT? 
BEQ +4 $ 
HLT 3 sLOOKS LIKE SYNC STRIPPED? 
CMP #RXBUF F +10,R0 ;BUFFER DONE? 
BNE 2$ ;BR IF NO 
SCOPE sSCOPE THIS TEST 


8 OF THE SEQUENCE 


‘VERIFY THAT BIT 
STRIPS CH ARS FROM CORE BUT NOT 


‘ sREGISTER 
7FROM THE 


SEQ 0039 


a ee 


B 4 
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CZDQFF .P11 O5=MAY=81 09:27 PROGRAM ANITIALIZATION AND START UP. SEQ 0040 
2004 ; TEST 40 
| 2005 sRRRRRAARERAARE RAR ARERAETAE AAA ARAEAHEAERRERAEAHEERERARRERAH HERR ES ES 
007470 012737 000040 001226 TST40: MOV #40, TSTNO 
5007 007476 012737 010002 001216 MOV aistal, NEXT 
2008 007504 004737 011024 JS SET UP ALL NECESSARY FOR TEST. 
007510 012777 100010 171654 MOV watt iSebIT3, aposéc 
sSET BCC START CLEAR AND SNGL CHAR 
2011 007516 105377 171640 DECB aDORCSH “SEL CHAR ADD 16(8) 
5012 007522 112777 000010 171640 MOVB _— #10, ADOREG “SEL CHAR REG 
3013 007530 012777 112600 171634 MOV #225%400, abQseC *LOAD CHAR 
5014 007536 112777 000014 171624 MOVB  #14,@DQREG “SEL THE SEQ REG 
2015. 007544 012777 100400 171620 MOV *witis*BiT8, aposé 
2016 ET SNGL CHAR AND CHAR STRIP. 
2017 007552 012700 012014 MOV #TXBUFF ,RO “GET TX POINTER 
2018 007556 105020 1$: CLRB —s- (RO) + ‘CLEAR IT OUT 
2019 007560 022700 012215 CMP aTXBUFF +201, RO ALL DONE? 
2020 007564 001374 BNE 1$ ‘BR IF NO 
3021 007566 112737 000350 012015 MOVB  #350,TXBUFF+1  :LOAD CHAR 
5022 007574 112737 000225 012017 MOVB  #225.TXBUFF+3 SAME 
5023 007602 112777 000017 171560 MOVB «#17, @DOQREG “SEL POLY REG 
5024 007610 012777 000200 171554 MOV #200, aDQSEC ‘SET FOR LRC 8 
2025 007616 012737 000010 013040 MOV #8. , COUNT [SET FOR 8 BIT CHAR 
2026 007624 012737 000225 013036 MOV #225, CHAR “SET EXPECTED BCC CHAR 
27 007632 112777 171530 MOVB #3, @DOQREG “SEL THE TX WC PRI. 
5028 007640 012777 177576 171524 MOV #202. @aDQSEC SET BIG 
2029 007646 105077 171516 CLRB “SEL REC PRIMARY 
30 007652 012777 012216 171512 MOV mrt. Q@DQSEC ;SET WITH START ADRS 
2031 007 112777 171502 MOVB #1, aDQREG [SEL REC CHAR CNT 
3032 007666 012777 177775 171476 MOV 45 adQse. ‘SET CHAR COUNT 
33 007674 «112777 171466 MOVB #4, a@DQR [SEL REC SECONDAR 
50%4 007702 012777 012236 171462 MOV ARsBUP +20, apasec SET WITH SEC ADRS 
5035 007710 112777 171452 MOVB aDOQREG :SEL CHAR COUNT 
5036 007716 012777 177577 171446 MOV #301. aDOQSEC iSET CHAR COUNT 
2037 007724 004737 011674 JSR PC,NEWENA :SET GO BITS FOR RX AND TX; WAIT FOR RX DONE. 
2038 007730 013703 013040 MOV COUNT ,R3 ; SAVE COUNT 
5039 007734 000241 S$: CLC 
3040 007736 106100 ROLB = RO “SHIFT RX Bcc IMAGE 
2041. 007749 005500 6$: ADC RO [SAVE CARRY 
2042 007742 023700 013036 CMP CHAR, RO ‘GOOD BCC? 
2043 007746 001403 REQ 4$ ‘BR IF YES 
2044 007750 005303 DEC R3 TALL SHIFTS DONE ? 
2045 007752 001370 BNE 5$ ‘BR IF NO 
2046 007754 104013 HLT 13 ‘RX BCC WRONG! ! 
2047 007756 012701 012216 4$: MOV #RXBUFF RI “GET RX BUFFER 
2048 007762 123721 013036 7$: CMPB CHAR, (R1)+ ; CHAR STRIPPED 
007766 001001 BNE “+6 
5050 007770 104013 HLT i3 +8 BIT CHAR NOT STRIPPED. 
2051 007772 022701 012226 as: CMP #RXBUFF+10,R1 ALL DONE? 
3052 007776 001371 BNE 7$ ‘NOT YET 
2053 010000 104400 SCOPE 
2054 
2055 
2056 
2057 sTEST OF BCC TEST/ 


APPEND 
$035 STEST OF 1 BCC'S TESTED/APPENDED 
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: TEST 41 
SRARARAARARAERRRARREE RES OEAERERERARAERERERRERERERARORAHEREERERRERENED 
TST41: MOV #41, TSTNu 
MOV ATSTS 2.N 
MOV WaITISSBITS*BITS, FUNCT 
MOV #000, XPOLY SET EXTENDED POLY. 
MOV #255.POLY SSET 00-15 
JSR PC,BCC.TA ‘GOTO SUBROUT INE 
MOV @DOERR.ERR ‘1S THE iN ERROR CONDITION? 
BPL +4 ‘BR IF NO ERRORS 
HLT 15 ‘THE DQ11 ERROR FLAG IS SET!! 
SCOPE “SCOPE THIS TEST 
:TEST OF BCC TEST/ APPEND 
“TEST OF 2 BCC'S TESTED/APPENDED 
TEST 42 
sRARAAARRARRERAREREEAREEHRERERERRERRARARAARRARARERAERAAARAHARERAEAARAHAAH 
TST42: MOV #42, TSTNO 
MOV #TS143,NEXT 
MOV wB1T15*B1T4, FUNCT. 
MOV 000,XPOLY :SET EXTENDED POLY. 
MOV #112601, POLY ET 00-15 POLY 
JSR PC,BCC.TA ‘26T0 SUBROUT INE 
MOV @DOERR.ERR ‘1S THE AN ERROR CONDITION? 
BPL +6 ‘BR IF NO ERRORS 
HLT 15 ‘THE DQ11 ERROR FLAG IS SFT!! 
SCOPE “SCOPE THIS TEST 
sTEST OF BCC TEST/ APPEND 
‘TEST OF 3 BCC'S TESTED/APPENDED 
3; TEST 43 
FRRAAAAAEERARARERERAEERETERERAARERAARERERARRROREARRERAAREHEARAREEARORS 
1S143: MOV #43, TSTNO 
MOV #15144 ,NEX 
MOV mBiTi5s6115, FUNCT. 
MOV #225, XPOL :SET EXTENDED POLY. 
MOV #112001, POLY “SET 00-15 POL Y 
JSR PC,BCC.TA :GOTO SUBROUT INE 
MOV aDOERR, ERR ‘1S THE AN ERROR CONDITION? 
BPL <BR IF NO ERRORS 
HLT is” ‘THE DQ11 ERROR FLAG IS SET!! 
SCOPE “SCOPE THIS TEST 


SEQ 0041 
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INITIALIZATION AND START UP. 


sMULTIPLE FUNCTION! !!! 


‘FUNCTIONS EXERCISED 
350) 


Ooo ——— 
= NONrWRU 


. 
e 
° 
. 

. 
° 
. 
oe 
° 


. 


o-—m 


oo 


deat 


302 


309 


TEST 44 


START CHAR 


( 

SNGL CHAR MATCH 
DBL CHAR MATCH 

SNGL CHAR FLAG 

DB. CHAR FLG 

RX STRIP 

BCC START CLEAR 
RX/TX TRANS 


CHAR (225) 


SNGL CHAR MATCH 

SNGL CHAR FLAG 

RX STRIP 

CLEAR GO/SET DONE 

BCC TEST /APPEND (3 BCC’S) 
CLR RX TRANS 


“DLE STRIP/ADD (20) 
-15 S 


NGL CHAR MATCH 
DLE STRIP/ADD 


RRR REREA AREER EREREREERREREREEEEAAARRRERRAERE HERES 


001226 TST44: MOV 
001216 


#.EOP,NEXT 
PC, SET.UP :SET UP ALL NECESSARY FOR TEST. 
#170412,aDQSEC :LOAD THE SEQ FUNCTIONS 


a@DORCSH “GET CHAR ADD 16(8) 
#10, @DOQREG “GET CHAR REG. 
#225*400,a@DQSEC :LOAD CHAR. 

#14, @DQREG SSFL SEQ REG 
#120644,a@DQSEC :LOAD SEQ FUNCTIONS 
@DORCSH ; 

#10, aDQREG ‘SEL CHAR DET 
#10020,aDQSEC LOAD FUNCTIONS 

#16, [SEL SEQ REG 

#101000, aDQSEC LOAD DLE (20) 

#6, ADOREG : TX SEC ADRS 
#TXBUF F +50, aDOSEC >SET SEC ADRS 
#1, aDOREG =SEL REC PRI SHAR CNT 
#-200,aDQSEC §:SET CHAR CNT 

#67, aDOREG =SEL TXSEC CHAR CNT 
#-2.aDQSEC “SET CHAR CNT 

#17. aDQREG ‘SEL POLY REG 

#172516, @DOSEC :SET *wWILD* POLYNOMIAL 
#12, aDOREG ‘SEL THE MISC REG 
wR1T6,aDQSEC SET THE ‘EXT POLY’ BIT 
#17, aDQREG SWRITE POLY 16-23 


SEQ 0042 
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E 4 


#275 ,aDQSEC 
#TXBUFF ,RO 
(PC) +, (RO)+ 


, 350 


(PC) +, (RO) + 
11,224 
(PC) +, (RO) + 
107,201 
(PC) +, (RO)+ 
371,25 


', 
#TXBUFF +50,RO 


a@DQRCSR 

: +4 

14 
@DOERR,ERR 
+4 

17 

#200, aDQRCSR 
+4 

14 

#300, aDQTCSR 
+4 


14 

#1,aDQREG 

aDQsec 

+4 

14 

#3, QDQREG 

aDQSEC 

+4 

14 

ona * RO 
#i0,R2 

#350. (RO) 

#225,.(RO* 


#20. (RO)+ 
33" 
R2 
1$ 


IGET POINTER 
;LOAD THE BUFFER WITH DATA 


;DATA 

LOAD THE BUFFER WITH DATA 
“DATA 

‘LOAD THE BUFFER WITH DATA 

;DATA 

sLOAD THE BUFFER WITH DATA 
ATA 


;LOAD RO 
ney BUFFER WITH DATA 


;DAT 
SET GO BITS FOR RX AND TX; WAIT FOR RX DONE. 


;DID RX CHAR FLAG SET? 
7BR IF YES 

CHAR DET FLAG NOT SET. 
ZANY ERRORS? 

[BR IF NO ERRORS 

;DQ11 ete FLAG SET! 
SDONE(P)=1; P/S=0; GO=0? 


7YES 
RX CSR Ss DATA 
: DONE (P) = 1; P/S=0; GO=0? 


YES 

TTX CSR WRONG DATA 
[GET RX WC PRI. 
7$/B NOT=0 


;BR IF OK 
;RX WC PRI S/B NON-ZERO! : 
-¥ THE TX WC PRI. 


7TX WC PRI S/B NON-ZERO 

iGET RX BUFFER POINTER 

SET CHAR COUNT 

zARE THE TWO CHARS STRIPPED? 


‘CHAR ''350'' NOT STRIPPED FROM CORE 
“CHAR ''225'' NOT STRIPPED 
ar © DLE STRIPPED? 


:DLE STUCK == REFER TO M7817 ECO 
: CHECK E84 ONE=-SHOT 
;ALL DONE? 


3NO 
7SCOPE THE TEST 


SEQ 0043 


F 4 
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CZDQFF P11 0S=MAY=81 09:27 PROGRAM INITIALIZATION AND START UP. SEQ 0044 
2 
2210 
2211 010652 -MEMCLR: 
2212 010652 105077 170512 CLRB Q@DOREG 
2213 010656 012705 000020 MOV #16. ,R5 
2214 010662 152777 000020 170500 1$: BISB #B1T4 ,aDQREG 
2215 010670 142777 000140 170472 BICB #140 ,aDQREG 
2216 010676 005077 170470 CLR @DQSEC 
2217 010702 105277 170462 INCB @DQREG 
2218 010706 005305 DEC R5 
2219 010710 001364 BNE 1$ 
2220 010712 105077 170452 CLRB @DOREG 
2221 010716 105077 170440 CLRB @DQRCSH 
2222 010722 012705 000020 MOV #16. ,R5 
2223 010726 112777 000010 170434 2$: MOVB #10, aDQREG 
2224 010734 005077 170432 CLR aDQSEC 
2225 010740 112777 000014 170422 MOVB #14, aDQREG 
2226 010746 005077 170420 CLR @DQSEC 
2227 010752 105277 170404 iNCB @DQRCSH 
2228 010756 005305 DEC R5 
2229 010760 001362 BNE 2$ 
2230 010762 105077 170374 CLRB @DQRCSH 
2231 010766 -MSTCLR: 
2232 010766 112777 000012 170374 MOVB #MISC.,aDOQREG 
2233 010774 012777 000040 170379 MOV #B1T5 ,aDQSEC 
2234 011002 000240 NOP 
2235 011004 112777 000012 170356 MOVB AMISC. ,@DOREG 
2236 011012 012777 000040 170352 MOV A#BITS ,aDOSEC 
ie4 071020 000002 RTI 
2239 011022 000000 FUNCT.: 0 
2240 011024 SET .UP: 
2241 011024 104413 MEMCLR CLEAR ALL THE DQ11 REGISTERS 
2242 011026 012702 000010 MOV #10,R2 PREPARE TO CLEAR THE TX BUFFER 
2243 011032 012700 012014 MOV #TXBUFF ,RO ;GET THE BUFFERS ADDRESS 
2244 011036 105020 CLRB (RO) + START CLEARING 
2245 011040 005302 DEC R2 zALL CLEAR? 
2246 011042 001375 BNE 4 ;BR IF NOT DONE. 
2247 011044 105077 170320 CLRB @DOREG SELECT THE RX BA PRI. 
2248 011050 012777 012216 170314 MOV ARXBUFF ,@DQSEC ;LOAD RX BA PRI. 
2249 011056 105277 170306 INCB @DQREG ;GET RX WC PRI. 
2250 ©11062 012777 177770 170302 MOV #-10,aDQSEC SET FOR 8. CHARS. 
2251 011070 105277 170274 INCB @DQREG ;GET THE TX BA PRI. 
2252 011074 005737 001510 TST DOSTAT ONE SYNC CHARACTER? ze e€ 
2253 011100 100404 BMI 10$ ;1F NO, BR. sete 
2254 011102 112737 000377 012012 MOVB #377 ,SYNC SET MARK. Ties | 
2255 011110 000403 BR 20$ 7 CONTINUE. s3ee€ 
2256 011112 112737 000026 012012 10%: MOVB #26,SYNC RESTORE SYNC CHARACTER. 35°°E 
2257 011120 012777 012012 170244 20%: MOV AMSYNC ,aDQSEC SET ADDRESS 3+€ 
2258 011126 105277 170236 INCB @DQREG 7SEL THE TX WC PRI. 
2259 011132 012777 177766 170232 MOV 4-12, aDQSEC 7SET FOR 8. CHARS AND 2 SYNC'S 
2260 011140 112777 11 170222 MOVB #11,a@DQREG 7SEL THE SYNC REGISTER 
2261 011146 013777 012010 170216 MOV - SYNC ,@DQSEC ;LOAD WITH SYNC 
2262 011154 105277 170210 INCB @DQREG SELECT THE MISC REGISTER 
2263 011160 012777 004000 170204 MOV #4000 ,aDQSEC SET FOR EIGHT BITS. 
(2264 011166 032737 040000 001510 BIT #JUMBIT,DQSTAT :IF TEST JUMPER AT END OF CABLE; 


C7DOF MACY11 30(1046) OS-MAY=81 14:18 PAGE 46 
CZ7DQFF.P11 05=MAY=81 09:27 

2265 011174 00100 BNE 
3266 011176 052777 000010 170166 BIS 
2267 011204 112777 000017 170150 MOVB 
3268 011212 112777 000010 170150 MOVB 
2269 011220 012777 164000 170144 MOV 
2270 011226 112777 000014 170134 ~ MOVB 
2271 011234 000207 RTS 

| = 9272 «011236 EXT.UP: 

—- 333973) 011236 104413 MEMCLR 

| 3374 011240 012702 000020 MOV 

| 2275 011244 012700 012424 MOV 

2276 «011250 005020 CLR 

| 2277 011252 005302 DEC 

| =. 2278 «011254 001375 BNE 

| = 2279-«011256 »=005737 001510 TS] 

280 011262 10 BM] 

| 2281 011264 012737 177777 012420 MOV 

| 2282011272 +—000403 BR 

| - 3283. «011274 «012737 «013026 ~=012420 108: MOV 
2284 011302 012737 013026 012422 208: MOV 
2285 011310 105077 170054 CLRB 
2286 011314 012777 012216 170050 MOV 
2287 011322 105277 170042 INCB 
2288 011326 012777 177770 170036 MOV 
2289 011334 105277 170030 INCB 
2290 011340 012777 012420 170024 MOV 
2291 011346 105277 170016 INCB 
3292 011352 012777 177766 170012 MOV 
2293 011360 112777 11. 170002 MOVB 
2294 011366 013777 012010 167776 MOV 
2295 011374 105277 167770 INCB 
2296 011400 005077 167766 CLR 
2297 011404 032737 040000 001510 BIT 
2298 011412 001003 BNE 
2299 011414 052777 000010 167750 BIS 
2300 011422 112777 000017 167732 MOVB 
2301 011430 112777 000010 167732 MOVB 
2302 011436 012777 003721 167726 MOV 
2303 011444 112777 000014 167716 MOVB 
2304 011452 000207 RTS 
2305 
2306 011454 BCC.TA: 
2307 011454 737, 011024 JSR 
2308 011460 012777 100010 167704 MOV 
2310 011466 105377 167670 DECB 
2311 011472 112777 000010 167670 MOVB 
2312 011500 012777 176400 167664 MOV 
2313 011506 112777 000014 167654 MOVB 
2314 011514 013777 011022 167650 MOV 
3815 011522 112777 000017 167640 MOVB 
2316 011530 013777 013032 167634 MOV 
2317 011536 112777 000012 167624 MOVB 
2318 011544 052777 000100 167620 BIS 
2319 011552 112777 000017 167610 MOVB 
2320 011560 013777 013034 167604 MOV 


G 4 


.+10 
#B1T3,aDQSEC 


#14,aDQREG 
PC 

#29,R2 
#XTXBUF ,RO 


#-1 ,XSYNC 


#13926, XSYNC 
#13026,XSYNC2 


@DQREG 
#RXBUF F ,@DOSEC 
@DQREG 
#-10,aDQSEC 
@DOREG 

AXSYNC ,@DQSEC 
@DQREG 

4-12, aDQSEC 


aDQsec 
#JUMBIT ,DQSTAT 
+10 


#B1T3,aDQSEC 
#17, aDQRCSH 


#14,aDQREG 
PC 


PC,SET.UP 
#B81115+B1T3,aD0S 


@DQRCSH 


POLY, @DOSEC 


EC 


PROGRAM INITIALIZATION AND START UP. 


RUN DATA THROUGH IT. 

NO TEST JUMPER; SET TEST LOOP 

3GET LAST CHAR DET ADDRESS. 

SEL CHAR DET REGISTER 

;LOAD THE CHARACTER 

GET THE SEQ REGISTER 

;LEAVE ROUTINE POINTING TO SEQ REGISTER. 


;CLEAR ALL THE DQ11 

PREPARE TO CLEAR THE TX BUFFER 
;GET THE TX BUFFER ADDRESS. 
;START CLEARING 

; DONE ? 


;BR IF NO 

sONE SYNC CHARACTER? ia, - 
;IF NO, BR. °F ae 
;SET MARK. S57 
: CONTINUE. Fo - 
sLOAD SYNCS Fe ae - 
:DITTO i ++E 


;SEL THE RX BA PRI. 

;LOAD THE ADDRESS 

7SEL THE RX WC PRI. 

7SET FOR TEN CHARS 

7SEL THE TX BA PRI. 

;LOAD THE ADDRESS. 

7SEL THE TX WC PRI. 

7SET FOR TwO SYNC AND 8. CHARS 
;SEL THE SYNC REGISTER 
;LOAD SYNC 

SEL THE MISC REGISTER. 
7SEL 16 BITS PER CHAR. 

71F TEST JUMPER INSTALLED; 
RUN DATA THROUGH CABLE. 
3NO JUMPER; SET TEST LOOP! 
;GET LAST CHAR DET ADDRESS 
GET CHAR DET REGISTER 
;LOAD CHARACTER 

SEL THE SEQ REGISTER 
LEAVE THE ROUTINE. 


SET UP ALL NECESSARY FOR TEST. 


SET SNGL CHAR AND BCC START CLEAR 
;GET NEXT ADDR 

7SEL CHAR DET ADDR 

;LOAD CHAR 

SEL THE SEQ REG. 

SET THE TEST a FUNC TIONS 


SSEL EXT POLY REG 
“RESEL. THE POLY REG 
“SET 16-23 POLY 


SEQ 0045 


H 4 


CZDQF MACY11 3061046) OS=MAY=81 14:18 PAGE 47 

CZDOFF P11 05=MAY=81 09:27 PROGRAM INITIALIZATION AND START UP. 
2321 011566 012700 012014 MOV #TXBUFF RO sSET TX POINTER 
2322 011572 012720 MOV (PC) +, (RO)+ ‘LOAD THE BUFFER WITH DATA 
2323 011574 350 355 .BYTE 350,355 ‘DATA 
2324 011576 012720 MOV (PC)+,(RO)+ :LOAD THE BUFFER WITH DATA 
2325 011600 360 365 .BYTE 360,365 “DATA 
2326 011602 012720 MOV (PC) +, (RO)+ ;LOAD THE BUFFER WITH DATA 
2327 011604 370 375 -BYTE 370,375 ‘DATA 
2328 011606 012720 MOV (PC) +, (RO)+ sLOAD THE BUFFER WITH DATA 
2329 (011610 377 377 .BYTE 7,377 “DATA 
2330 011612 006737 011620 JSR PC, ENABLE “SET GO BITS FOR RX AND TX; WAIT FOR RX DONE. 
2331 011616 000207 RTS S LEAVE 
2333 011620 005037 011670 ENABLE: CLR 3$ : 
2334 011624 012737 000005 011672 MOV #5,4$ “SET DELAY 
2335 011632 005277 16752 INC aDORCSR =SET RX GO. 
2336 «4011636 005277 167522 INC aDOTCSR ‘SET TX GO. 
2337. 011642 +105777 +167512 1$: TSTB = @DORCSR “RX PRI. DONE? 
2338 011646 100407 BM] sBR IF YES 
2339 011650 005237 011670 NC 3$ “DELAY. ec eeeeee 
2340 611654 001372 BNE 1$ ; 
2341 011656 005337 011672 DEC 4$ agate Saree 
2342 011662 001367 BNE 1$ ; 
2343 011664 104001 HLT 1 :RX PRI DONE NOT SET. 
2344 011666 000207 2$: RTS PC “LEAVE 
2345 011670 000000 3$: 000 
e346 011672 4$: 600 
2348 011674 005037 012004 NEWENA: CLR 3$ 
2349 011700 012737 000005 012006 V #5,4$ :SET DELAY 
2350 011706 005277 167446 INC @DQRCSR ;SET RX GO 
2351 011712 005277 167446 INC aDOTCSR :SET TX GO 

a 2352— 011716 105777 167436 1$: TSTB @DQRCSR :RX PRIMARY DONE? 
2353 011722 100410 BM] “BR IF YES 
2354 011724 005237 012004 INC 3$ sDELAY 
2355 011730 001372 BNE 1$ ke 
2356 011732 005337 012006 DEC 4$ pes 
2357 011736 001367 BNE 1$ ‘Wag 
3358 011740 104001 HLT 1 ‘RX PRI DONE FAILED TO SET 
2359 011742 000417 BR * LEAVE 
2360 011744 112777 000012 167416 2%: MOVB  #12,@DQREG ‘SEL THE MISC REG 
2361 011752 042777 000010 167412 BIC #B1T3,aDQSEC ‘STOP DATA 
232 011760 112777 000015 167402 MOVB #15, a@DQREG “SEL RX BCC 
2363 011766 017700 167400 MOV aDOsEC,RO “READ INTO RO 
2364 011772 105277 167372 INCB @DOQREG ;SEL TX BCC 
2365 011776 017701 167370 V QDOSEC,R1 ;READ INTO R1 
2366 012002 000207 5$: RTS p ‘RETURN 
2367 012004 000000 3$: .WORD 0 
2368 012006 000000 4$: “wORD 0 
2369 
2370 
2371 012010 026 026 .SYNC: .BYTE 26,26 
2372 012012 026 026 SYNC:  .RBYTE 26,26 
2373 012014 TXBUFF: 0 
2376 012216 .=.*200 
2375 012216 000000 RXBUFF: 0 
2376 012420 .=.*200 


SEQ 0046 


C7DOF 
— CZDOFF LP 


MACY11 30(1046) 


OS=MAY=81 


im OS=MAY=81 09:27 


012420 
012422 
012426 
012626 


013030 


OAKNOASM 


52 


ee ek eed ed nd ed td ot 


026 
026 


000000 
012626 
000000 
013030 


005037 


002254 


026 
026 


001234 


30 166044 
76 


001276 


001214 


14:18 PA 


GE 
PROGRAM 


XSYNC: 
XSYNC2: 


GDCHAR: 
DETCAR: 


«EOP: 


R 
LOGICAL: 


RESTRT: 


I 4 


48 
INITIALIZATION AND START UP. 


«BYTE 26,26 
-BYTE 26,26 
00000 


zEND OF PASS 

; TYPE NAME OF TEST 
;UPDATE PASS COUNT 

;CHECK FOR EXIT TO ACT=11 
sRESTART TEST 


CLR LSTERR 
CLR ERRFLG 
INC PASCNT 


MOV PASCNT ,@LIGHTS 
AVNUM 
MOV a442,R1 


BEO RESTRT 


JSR PC,(R1) 


#TST* RETURN 


;CLEAR LAST ERROR PC 
;CLEAR ERROR FLAG 
;UPDATE PASS COUNT 


;DISPLAY PASS COUNT 


sCHECK FOR AC 
;1F NOT, CONTINUE TES 


SEQ 0047 


_ CZDOFF P11 


CZDQF 


MACY11 30(1046) 
05=MAY=81 


013352 
01 


017605 
062766 


105715 


OS=MAY=81 


09:27 
002254 
002 


002 


002 


002 


040000 


165726 
165722 
004000 


001224 
001224 


001000 
001220 


000002 
000002 
015060 


010000 


165732 


165620 


000002 


165560 


14:18 PAGE 49 


END OF PASS ROUTINE 


XCSR: 


XVEC: 


KPASS: 


KERR: 


« SCOPE : 


TTST: 


1$: 


“tg 
-BYTE 
pee 
«BYTE 
— 
«BYTE 
— 
-BYTE 
ERRCNT 


; SCOPE 


3; CHECK 


$11 

6.2 

3.2 

6.2 

6.2 
LOOP AND INTERATION HANDLER 
#BIT14,aSWR 
1$ 

3$ 

@aTKCSR 

3$ 

@TKDBR ,RO 
#SwW11,aSWR 
2s 

LPCNT 
LPCNT, 1 COUNT 
3$ 

ERRFLG 
LPCNT 
#75.,1COUNT 
NEXT ,RE TURN 
RE TURN, (SP) 


FOR FREEZE ON CURRENT DATA 


—— 
LOCK, (SP) 


; TELETYPE OUTPUT ROUTINE 


MOV 
MO 


R5,-(SP) 


30 
#SW12,aSWR 
3$ 

(R5) 


SEQ 0048 


| C2DOFF P11 


CZDQF 


013424 
013426 
013432 
013434 
013442 
013446 
3450 


leleleleleieilea) 
ah aod cold acl aah coh aol 
FEESEEE 


MACY11 3)(1046) 
05-MAY=81 


010546 
010446 


OS=<MAY-81 14: 
09:27 


165556 
000015 
165542 
000012 
165526 
165522 


000004 
000002 


015652 
000007 
165446 
165442 
000200 
000025 
015240 
000015 


165410 
165404 


015060 
015240 


165550 


165534 


013520 
090004 


165412 


18 PAGE 


K 4 


50 
GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE,ETC.) 


2$: 


3$: 


2008: 


2s: 


. INSTE: 
-INSTG: 


400$: 


INSTR2: 


«PARAM: 


BPL 2$ 

TSTB aTPCSR 

BPL = 

MOV #15,aTPDBR 
TSTB aTPCSR 

BPL «74 

MOV #12,aTPDBR 
TST8 aTPCSR 

BPL 2$ 

MOVB (R5)+,aTPDBR 
BNE 1$ 

MOV (SP)+,R5 
RTI 


zASCII STRING INPUT ROUTINE 


: MOV R3,-(SP) 
MO 


ADD #2,4(SP) 


TYPE 

MOV #INBUF ,R4 
MOV #7 ,R3 
TSTB aTKCSR 
BPL 1$ 


MOVB @TKDBR, (R4) 
BICB #200, (R4) 


CMPB (R4) #25 71S IT <*@ 
BNE 200$ 

TYPE .MCRLF 

BR . INST1 

CMPB (R4) +415 

BEQ R2 


INST 
MOVB @TKDBR ,aTPDBR 
TSTB sy CSR 


BPL 
DEC R3 
BNE 1$ 
- INSTG 

MOV R3,-(SP) 

V R4,-(SP) 
TYPE 
MGM 
TST @ARDSW 
BEQ 400$ 
TYPE ,MCRLF 
BR . INSTI 
MOV (SP)+, R4 
MOV (SP)+,R3 
RT] 


CONVERT ASCII STRING TO OCTAL 


MOV R5,-(SP) 
MOV R4,-(SP) 


SEQ 0049 


j 
' L 4 
| CZDQF _MACY11 30(1046) OS-MAY-81 14:18 PAGE 51 


CZDQFF P11 0S=MAY=81 09:27 GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE,ETC.) SEQ 0050 
013652 016605 000004 MOV 4(SP) ,R5 
013656 012537 014052 MOV (R5)+,LOLIM 
013662 012537 014054 MOV (R5)+,HILIM 
01 012537 014056 MOV (R5)+,DEVADR 
013672 112537 014060 MOVB (R5)+,LOBITS 
013676 112537 014061 MOVB (R5)+,ADRCNT 
013702 010566 000004 MOV R5.4(SP) 
013706 005005 PARAM]: CLR R5 
013710 012704 015652 MOV #INBUF ,R4 
013714 122714 000015 CMPB #15, (R4) 
013720 001420 BEQ PARERR 
013722 121427 000060 1$: CMPB (R4) ,#60 
013726 002415 .. BLT PARERR 
013730 121427 000067 CMPB (R4) ,#67 
013734 003012 BGT PARERR 
013736 142714 000060 BICB #60, (R4) 
013742 152405 BISB (R4)+,R5 
013744 122714 000015 ‘ CMPB #15, (R4) 
013750 001414 BEQ LIMITS 
C13752 006305 ASL 
013754 00630 ASL R5 
013756 006305 ASL R5 
013760 00076 BR 1$ 
013762 122714 000015 PARERR: CMPB #15, (R4) 71S FIRST CHARACTER A <CR> 
013766 001003 BNE 120$ 
013770 005737 015060 TST @ARD SW 31S CKSWR ROUTINE BEING USED 
013774 001023 BNE PARTI 
013776 104404 120$: INSTER 
014000 000742 BR PARAM1 

TEST TO SEE IF NUMBER IS WITHIN LIMITS 
014002 020537 014054 LIMITS: CMP R5,HILIM 
014006 101365 BHI PARERR 
014010 020537 014052 CMP R5,LOLIM 
014014 103762 BLO PARERR 
014016 133705 014060 BITB LOBITS,R5 
014022 001357 BNE PARERR 
;STORE NUMBER AT SPECIFIED ADDRESS 
014024 013704 014056 MOV DEVADR ,R4 
014030 010524 1$: MOV R5,(R4)+ 
014032 062705 000002 ADD #2,R5 
014036 105337 014061 DECB ADRCNT 
014042 001372 BNE 1$ 
014044 012604 PARTI: MOV (SP)+,R4 
014046 012605 MOV (SP)+,R5 
014050 000002 RTI 
014052 000000 LOLIM: Q 
014054 000000 HILIM: OQ 
074056 000000 DEVADR: 0 
014060 000000 LOBITS: 0 
014061 ADRCNT=LOBITS+1 


SAVE PC OF TEST THAT FAILED AND RO=R5 





MACY11 30(1046) 


ZDQFF P11 


r 
CZ7DQF 
| ¢ 

| 


| 2604 


014062 


014070 


014120 


014122 


014152 


014154 


O5=MAY=81 09:27 


016637 


062766 
2137 


ee eS PE 
aheabetbah dat atad 
yah tate peop pity 
NNN 
oO Ww 
WwW N 


Onn 
NON ONAN 
ROROKRNO 
=RAR4OW 


004 
005305 
001362 
012703 
114023 


OS=MAY=-81 14:18 PAGE 52 
GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE ETC.) 
000004 001274 .SAVOS: MOV 4 (SP) , SAVPC 
sSAVE RO=-R5 
001270 SV05: MOV RS, SAVRS 
001266 MOV RG, SAVRG 
001264 MOV R3, SAVR3 
001262 MOV R2, SAVR2 
001260 MOV R1,SAVR1 
001256 MOV RO, SAVRO 
RTI 
sRESTORE RO-R5 
001256 .RESOS: MOV SAVRO,RO 
001260 MOV SAVR1,R1 
001262 MOV SAVR2.R2 
001264 MOV SAVR3.R3 
001266 MOV SAVR4 R4 
001270 MOV SAVRS .R5 
RTI 
~CONVR: TYPE 
MCRLF 
.CNVRT: MOV RO,-(SP) 
MOV R1.=(SP) 
MOV R3,-(SP) 
MOV R4.=(SP) 
MOV R5,-(SP) 
00001 MOV @12(SP),R1 
015714 001250 MOV TEMP, TEMP3 
000012 ADD #2,12(SP) 
01437 MOV (R1)+,WRDCNT 
014376 1$: MOVB (R1)+, CHRCNT 
014377 MOVB (R1) +, SPACNT 
014400 MOV a(R1)+,BINWRD 
014400 2$: MOV BINWRD.R4 
014376 MOVB —- CHRCNT,RS 
015714 MOV ATEMP,RO 
3$: MOV R4,R3 
177770 BIC #177770,R3 
000060 ADD #060,R3 
MOVB _——R'3, (RO) + 
CLC 
ROR R4 
CLC 
ROR RG 
CLC 
ROR R4 
DEC RS 
BNE 3$ 
015756 MOV WMDATA,R3 
4$: MOVB = =(RO), (R3)+ 


CS 


CONVERT OCTAL NUMBER TO ASCII AND OUTPUT TO TELEPRINTER 


M 4 


SEQ 0051 


—— Cr --/?/ 
I 


ho 


CZDQF 


| CZDOFF.P11 
2657 
265 





MACY11 30(1046) 
05-MAY=8 


014376 
014400 


014402 011646 


504 
014522 006304 


N 4 


OS-MAY-81 14:18 PAGE 53 
GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE ETC.) 


1 09:27 


014376 
014377 


000040 
014377 


014374 
001250 


000002 
000000 


177001 
001314 
000000 


010000 
164536 


000207 
020000 


001234 
001234 
001312 


000002 


5$: 


6$: 


015714 


Satan 

CHRCNT 

SPACNT= 
INWRD : 


HLT: 


0 
O XBX: 


DECB CHRCNT 

BNE 4$ 

TSTB “pom 
MOVB #040, (R3)+ 
DECB SPACNT 


BNE 5$ 
CLRB (R3) 
TYPE 

MDATA 


DEC WRDCNT 
BNE 1 
MOV TEMP3, TEMP 


MOV (SP)+,R5 
MOV (SP)+,R4 
MOV (SP)+,R3 
MOV (SP)+,R1 
MOV (SP)+,RO 
RTI 

0 

: 0 

CHRCNT +1 

0 


; TRAP DISPATCH SERVICE 


[ARGUMENT OF TRAP IS EXTRACTE 


AND USED AS OFFSET TO OBTAIN POINTER 


;TO SELECTED SUBROUTINE 


: MOV (SP) ,=(SP) 
SUB #2, (SP) 
MOV a(SP), (SP) 
ASL (SP) 
BIC #177001, (SP) 


ADD #. TRPTAB, (SP) 
MOV a(SP) , (SP) 
JMP a(SP)+ 


ERROR HANDLER 


CKSWR 

BIT #SW12,aSWR 
BEQ XBX 

TSTB ge 

BPL 


MOVB 4207 a@TPDBR 
BIT wu, aswR 


HALTS 
CMP a aati 


MOV (SP) ,LSTERR 
LRB  —sERRFLG 
SAVOS 

MOV (SP) .R5 

SUB #2, R5 

MOV (R5) RG 

ASL RG 


;GET PC OF RETURN 
z=PC OF TRAP 

;GET TRP 
_gMULTIPLY TRAP ARG BY 2 
-; CLEAR UNWANTED BITS 

;POINTER TO SUBROUTINE ADDRESS 
; SUBROUTINE ADDRESS 

3GO TO SUBROUTINE 


SEQ 0052 


B 5 


| CZDQF  MACY11 30(1046) OS=MAY-81 14:18 PAGE 54 
| CZDQFF.P11 05-May-81 09:27 GENERAL UTILITIES (TYPE OUT, ERROR, SCOPE ETC.) SEQ 0053 
| 014524 061504 ADD (R5) RG 
014526 006304 ASL RL 
014530 042704 177001 BIC #177001 ,R4 
014534 062704 016020 ADD # ERRTAB,RG 
014540 012637 014632 MOV (RG) +, ERRMSG 
014544 0124637 014644 MOV (R4)+,DATAHD 
| 014550 011437 014656 MOV (RS) ,DATABP 
014554 105737 001312 TSTB —ERRFLG 
014560 001403 BEQ TYPMSG 
014562 005737 014656 TST DATABP 
014566 001027 BNE TYPDAT 
014570 104402 TYPMSG: TYPE 
014572 015517 MTSTN 
014574 104411 CNVRT 
014576 014756 XTSTN 
014600 104402 TYPE 
14602 015605 MERRPC 
014604 104411 CNVRT 
14 014750 ERTABO 
C14610 104402 TYPE 
014612 015240 MCRLF 
014614 112737. 177777 001312 MOVB = #=1 ,ERRFLG 
014622 005737 014632 TST ERRMSG 
014626 001402 BEQ WRKO.FM 
014630 104402 TYPE 
014632 000000 ERRMSG: 0 
014634 WRKO.FM: 
014634 005737 014644 TST DATAHD 
014640 001402 BEQ TYPDAT 
014642 104402 TYPE 
014644 000000 DATAHD: 0 
014646 005737 014656 TYPDAT: TST DATABP 
014652 001402 RE SREG 
014654 104410 CONVRT 
014656 000000 DATABP: 0 
014660 104407 RESREG: RESOS 
014662 005777 164312 HALTS: TST aSwWrR 
100005 EXITER 
014670 010046 PUSHRO 
014672 016600 000002 MOV 2(SP) ,RO 
014676 000000 HALT 
014700 012600 POPRO 
014702 104414 EXITER: CKSWR 
014704 005237 001232 INC ERRCNT 
014710 032777 000400 164262 BIT #SWO8, aSWR 
014716 001007 BNE 
014720 032777 002000 164252 BIT #S5w10,aSwR 
014726 001407 BEQ 2$ 
014730 01373? 001216 001214 MOV NEXT, RETURN 
014736 012706 001200 1$: MOV #STACK, SP 
014742 000177 164246 JMP @RE TURN 
014746 000002 2$: RTI 
014750 000001 ERTABO: 1 
014752 006 002 \BYTE 6,2 


S 
014756 000001 XTSTN: 1 





‘aia 


CZ7DQF 


CZDQFF P11 


| 
| 
| 2770 
| 
| 


MACY11_ 30( 1046) 
O5=MAY=81 


014760 
014762 
014774 


014776 
014776 
004 


lelelelelelelelelelelelele) 
pens fone Pe fe fe = Pe Pe OO PP Ps 


003 
001226 


012737 
000000 
000777 


012737 


05-MAY=81 
09:27 


002 


14:18 PAGE 
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55 
GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE,ETC.) 


-PFAIL: 


014776 000024 


NNN 


164142 
002 


RESTAR: 


PF TAB: 
-BYTE 


.CKSWR: 


~CNTLU: 


BYTE 3.2 
TSTNO 
ENTER HERE ON POWER FAILURE 


;SET UP FOR POWER UP TRAP 


MOV MRESTART,24 
HALT ;HALT ON POWER DOWN NORMAL 


;PROCESSOR WILL TRAP HERE WHEN POWER IS RESTORED 


MOV #.PFAIL,24 SET UP FOR POWER FAILURE 
MOV ASTACK, SP 
CLR TEMP 
INC TEMP 
BNE 274 
TYPE 
MPF AIL 
CNVRT 
PF TAB 
CLR ERRFLG 
LR LSTERR 
MSTCLR 
MEMCLR 
ta @RE TURN 
Joe 
TS*NO 
2 es ig REGISTER ROUTINE. CHECKS FOR “G TO ALLOW CHANGING 
sae USED: 
RDSW «WORD 0 
TST aA42 
BNE | OUT 
CMP ASWREG, SWR 3 SOF TWARE Pa pb REGISTER PRESENT 
BNE OUT NO, GET 
TSTB aTKCSR YES WAIT OFOR 
BPL OUT READY, GET CHARACTER 
MOV @TKDBR, .MSG SAND STRIP OFF 


BIC #177600, .MSG iTH E GARBAGE 
CMPB #7,.MSG 318 IT A <*@ 


BNE OUT 
TYPE, $CNTG 

COM @ARDSW 
TYPE , SMSWR 
CNVRT , SWREGC 
INSTR, $MNEW 
PARAM 


0 
177777 


SEQ 0054 


CZDQF 


CZDQFF .P11 


rrmnrnrnrnnw 
PSs aeteteter 
= OOR 


ot es 9 


lelelelelejojle)\o) 
~~ 3 3 J so 
NW lWahvabval cab abvabeal 
MAMAN 
& EWAN 
AOWNENS 


MACY11_ 30(1046) 
O5-MAY=81 


000176 
000 


& 
So 
Ww 
pas 
— 
oO 
w 


002 


000107 
051127 


047040 
000 


000077 
051127 


051123 
041505 
051501 
000040 
047522 


000 
052377 
047516 


043505 


0S=MAY=-81 
9:27 


020075 
053505 


043040 


042523 
943125 
047105 
040524 
020124 


020113 
046105 


020072 
042523 
051522 


051505 
020072 


020124 
044103 
052040 


14:18 PAGE 56 
GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE,ETC.) 


BYTE 
OUT: 


SWREGC: 
-BYTE 


SCNTG: 
SMSWR: 


MERR3: 


MTSTPC: 
MLOCK: 


MCSRX: 
MVECX: 
MPASSX: 
MERRX : 
MTSTN: 


MNE w: 


SWREG 
TYPE ,MCRLF 
LR 


: 


eASCIZ = <377>/*G/ 
eASCIZ = <377>/SWR= / 


eASCIZ / NEW= / 


ASCIZ / 


-ASCIZ <377>/R/ 
ASCIZ <377>/PROGRAM INDICATES NO DEVICES PRESENT./ 


eASCIZ = <377>/ INSUFFICIENT DATA!/ 


eASCIZ <377>/TEST PC=/ 
eASCIZ <377>/LOCK ON SELECTED TEST/ 


eASCIZ = /CSR: / 

eASCIZ /VEC: / 

-ASCIZ /PASSES: / 

eASCIZ /ERRORS: / 

eASCIZ = <377><377> /TEST NO: / 


sASCIZ <377>/SET SWITCH REG TO DQ11°S DESIRED ACTIVE./ 


@A4RDSW 


?/ 


: .ASCIZ <377>/END PASS DZDQF 


Pe <377> 
: .ASCIZ <377>/PWR FAILED. RESTART AT TEST / 


/ 


one ore ore 


SEQ 0055 


| 
| 


| 


CZDQF MACY11 30(1046) 


| CZDOQFF P11 
2881 015554 


nN 
oo 
co 
wo 
oO oO 
_—) 
Vv 
oa 
~ 
oO 


43646 
2896 015650 


2901 015652 
015714 
2904 

2905 015756 
2907 016020 


<a 
| 8 


a 


05-MAY-8 
020117 


050504 


053111 
035103 


OS=MAY-81 14 
1 09:27 


027105 


000040 
047440 
030461 
052524 


:18 

MERRPC: .ASCIZ 

XHEAD: .ASCIZ 

EVEN 

XSTATQ: 2 
BYTE 
TEMP1 
BYTE 
TEMP2 

EVEN 

INBUF: 0 

.=.+40 

TEMP: 0 

=. +40 

MDATA: 0O 

=.+40 

~ERRTA: 0 
0 
0 
EMO 
0 
0 
EM1 
DHO 
DT1 
EM2 
DH1 
0 
EM2 
DH2 
0 
EM2 
DH3 
0 
EM2 
DH4 
0 
EM2 
DHS 
0 
EM2 
DH6 
0 
EM2 
DH7 
0 


/P 


6,3 
6.2 


. 


PAGE 57 
GENERAL UTILITIES (TYPE OUT, ERROR,SCOPE,ETC.) 


Cr ¥ 
<377>/MAP OF DQ11 STATUS/<377> 


SEQ 0056 


| CZDOQF 


MACY11 30(1046) 
OS=MAY=-81 


— CZDQFF P11 


017214 
017230 


6 
017250 


016361 
017050 
000000 


041505 


0S=MAY=-81 
09:27 


042514 


011 


002 


044505 


051440 


14:18 PAGE 
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58 
GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE,ETC.) 


DT2: 


EM2 
DH10 
0 


EM2 
DH11 


0 
DH12 


> 

w 

oO 
es ae ae ee et te ae et et ttt tt tt tt tt tt tet 
NNN III EIN III IN IN II 


sHALT 12 
pHALT 13 
sHALT 14 
sHALT 15 
sHALT 16 
HALT 17 
sHALT 20 


sHALT 21 


<377>/CHARACTER pte ae TEST <SET FLAG>/ 

<377>/TEST OF SEQ REG 

<377>/BCC TEST-APPEND +AILURE. DQ11 ERROR FLAG SET./ 
<377>/DATA COMPARE ERROR/ 

<377>/DQ11 ERROR FLAG pee 

<377>/NO RECIEVER INTERUPTS 

<377>/CHAR RECEIVED ONDECTED ADDRESS/ 

<377>/BIT01 -SET T-/ 

<377>/BIT02 -CLEAR T-/ 

<377>/BIT03 -BCC START CLEAR-/ 

<377>/BIT06 -CLEAR ACTIVE-/ 

<377>/BI11T07 -SET DONE; 
<377>/B1T08 =CHARACTER STRIP=/ 
<377>/BI1T10 -TX PAD-/ 

<377>/B1IT11 -BCC EXCLUDE-/ 
<377>/BIT08 -RX CHAR STRIP=-/ 
<377>/MULTIPLE FUNCTIONS FAILURE/ 
<377>/EXPECTED RECEIVED/ 
<377>/DQERR / 

<377>/DLE STUCK / 


6.9. 
2.2 


3.6 
3.2 


SEQ 0057 


| C2DOF MACY11 30(1046) O5S=MAY=81 14:18 PAGE 59 


| CZDQFF P11 O5=MAY=81 09:27 GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE,ETC.) 
2970 017252 013036 CHAR 
+ 2971 ~017254 000001 DT3: 1 
| 2972 017256 C06 002 BYTE 6.2 
2973 017260 013030 ERR 
2976 000001 «END 


G 5 


SEQ 0058 


H 5 





-C7par  -MACY11 30(1066) O5=MAY=81 14:18 PAGE 61 
— CIDQFF.LP11 05=May=81 09:27 CROSS REFERENCE TABLE <= USER SYMBOLS SEQ 0059 
IT = 002000 609" 723 
ACTBIT= 006000 ‘6108 = 731 
DR =: 013042 1117*  3«-1176* «=. 1235* «= 1248* = 1261" =: 1274e = 1287* «=. 1300" )«=—s- 1313" «= 1326" «=: 1339" = 1352" = 1365 
1378* 1391* 1404* 1417* 1430" 1436 1468 23884 2965 
ADRCNT= 014061 2550* 2589* 25984 
BABIT = 010000 6114 727 JS 
| = 0 612" 271 1110 
 BCC.TA 011454 2067 = 2083'—S sé 2099s: 23806 # 
| BINWRD 014400 2639* 2640 2679M 
| B1T10 = 1 6044 1041 1133 1190 1451 
| BITl = 2 6034 1189 1487 1527-1872 1922 1961 
| BIT1O = 002000 5944 1763 1778 
BIT11 = 0046000 5934 ©6184 
| BIT12 = 010000 592# = =61133 1187 +1190 1651 1645 1896 1933 
| BIT13 = 020000 5918 1130 1448 1540 1896 1933 
| BIT14 = 040000 590 1187 14687 1527 38 1533 1632 1679 1733 1778 1872 1922 1961 2450 
BIT15 = 100000 589" 1130 1448 1493 1540 1569 1626 1671 1718 1763 1808 1814 1880 
1886 1928 1969 2009 2015 2064 2080 2096 2308 
BiTl2 = 6024 1012 1533 
BIT3 = C00010 6014 1189 1569 1808 2009 2266 2299 2308 2361 
BITS = 000020 6004 20646 2080 2214 
BITS = 0 599# 2064 2096 2233 2236 
BIT6 = 000100 5984 1626 1632 1939 2158 2318 
BIT? = 000200 5o7# = §=61136 1139 «1194 1654 1457-1493 1671 1679 1886 1928 
: 00 596 201718 ~=—S—«1733~—Ssé« 08 
= 001000 595@ 71880 1969 
013344 1018 24684 
013346 1019 26694 
013036 1582* 1597 1606 1829* 1843 1852 2026* + 2042 2048 #23864 2970 
= 000010 6298 
1236 799# 
001240 8008 
001242 8018 ; 
004314 1236 1249 1262 1275 1288 1301 1314 1327 = 1340 1353 1366 1379 ~=—s-: 1392 
1405 1418 1431 14348 
014376 2637" 2641 2657" 2677H 2678 
= 104414 8604 986 996 1011 2431 2449 2673 2696 2755 
= 104415 B62" ©=—-:296B 
= 104411 854# 2605 2609 2413 2617 2726 2730 2789 2820 
CONVRT= 104410 8524 976 2746 
013040 1118* 1119 1640 1583* 1593 1602 1828* 1839 1848  2025* 2038  2387# 
001 300 8164 940" 1050* 1054* 1063 1064* 1065 1066* 
CSRMAP 000220 6984 971 
DATABP 014656 2719 2722 2764 27478 
DATAHD 014644 2718* 2760 27434 
DETCAR 013046 11158 1126 1128 1134 1156* 11768 1185 1191 1192 1215* 14372 1638* 1446 
a 
DEVADR 014056 2548" 25 25968 
016563 2914 2961# 
016624 2917 = 2961 
017050 2938 83=—- 296 1# 
017075 2941 29614 
017124 2943 2958  2961# 
0171 2950 29614 
017203 2947 2953 29618 


I 5 
ZDQF = MACY11 30(1046) — 14:18 PAGE 62 


i ¢ 
CZDQFF.P11 = 05=MAY-81 CROSS REFERENCE TABLE <= USER SYMBOLS SEQ 0060 
DH2 016643 2920 29618 
DH3 016664 2923 ©=- 29618 
DHS 016715 2926 30-296 1# 
DH5 016743 2929 29614 
| DH6 016777 2932 = 296 1# 
| DH? 017030 2935 = 296 18 
| DISPRE 000174 689" 956 
DLIGHT= 177570 574 =? 
DOACTV 001500 669 ee ee. i 9198 993" 996 1044 1046 
DACROO 001400 8874 
DOCRO1 001404 889" 
DACRO2 001410 a9 14 
| DACRO3 001414 8934 
DACRO4 001420 895 
DACROS 001424 8974 
DACRO6 001430 899H 
DOCRO7 001434 9014 
DOCR10 001440 9034 
DOCR11 001444 9054 
DACRi2 C01450 9074 
DACR13 001454 909# 
DOCR14 001460 9114 
DOCR15 001464 9134 
DQCR16 001470 9154 
DOCRI7 001474 9174 
DOCSR 001506 9224 1063* 1067 
DOERR 001366 8774 1080" 1081* 1082 1896* 1933" 2068 2084 2100 2177 
001504 702* 739% 764 746 9214 9 2422 
DARCSH 001362 8754 1076 1077" 1120% 1125% 1183" 1636" 1489* 15298 1535" 1810" 1874" 1882 
1924* 1963" 2017" 21398 21448 22218 22278 22308 2267* 2300* 2310s 
DORCSR 001360 8744 1067* 1076 1078 1133 1145 1148 11908 1204 1207 1451" 1463 1466 
1348 1640* 1645 1652 1698  1977* 1979 2174 2180 2335 2337 2350* 2352 
DOREG 001370 8784 1082" 1083* 1084 1121* 11238 11278 11298 1131* 11798 1181" 1184* 1186* 
11B8* 1441" 1643% 1445% 1447* 1649 1490* 1492* 1501* 1505" 15308 1532" 1537s 
1539* 1571% 1573" 1584* 1586* 1588* 1590" 1648* 1690* 1694* 1811* 1813" 1816 
1818* 1830" 1832 1834* 1836* 1875 1879x 1883" 1885* 1888* 1893"  1895* * 
1904* 1925" 1927 19308 1932* 1941% 1945% 1964 1968* 2012* 2014" 2023"  2027* 
2029" 20381* 2033% 2035" 21408 21428 2165% 21478 2149" 2151" 21538 2155* 2157 
5159" 3186% 2190" 2212" 3214% 22158 22178 22208 22238 2225 22328 2235% 2247+ 
5249 3251" 2258% 2260" 2262 2268 22708 2285% 22878 2289" 2291% 2293* 2295 
2301* 2303* 2311% 23138 2315" 23178 23198 2360% 23628 2364 
DORLVL 001352 871# 1070* 1071* 1072 
DORVEC 001350 870 1068 1069* 1070 2439 
DASEC 001372 879# 1084* 1085" 1086 1122* 11248 1128" 11308 1132" 11368 11460" 1141* 1142 
1180* 11828 1185" 11878 1189* 1194* 1199% 1200* 1201" 1442* 1464% 14468 1648 
1450* 1654" 1658 1459% 1460* 1487* 1491% 1493* 1502 1506 1527# 1531* 1533 
1538* 1540" 1569" 1572* 1574* 1585* 1587* 1589" 1591" 1626" 1632* 1649 1671 
1679* 1691 1695  1718* 17338 1763* 1778 1808 1812 1814* 1817* 1819* 1831 
1833* 1835* 1837" 1872" 1876 1880* 1884* 18862 1889" 1894" 1898 1901 1905 
1922* 1926* 1928 1931" 1935" 1942 1946 1961* 1965 1969  2009* 2013" 2015s 
2024" 2028 20380" 2032* 2036" 2036" 21388 2141* 214638 2146% 2148% 27508 2152 
5154" 2156* 2158* 21608 2187 2191 22168 22248 22268 22332 22368  2248* 2250+ 
3257" 2259" 2261% 22638 2266* 22698 2286 2288% 2290* 22922 22948 22968 22998 
2302 2308" 23128 23148 2316% 2318" 2320" 23618 2363 2365 
DOSECH 001376 B80" 1086* 1087s 


| 4 3 
_ CZDOF 


MACY11 30(1046) O5S=<MAY=81 14:18 PAGE 63 
| CZDQFF.P11 05=MAY=81 09:27 CROSS REFERENCE TABLE <= USER SYMBOLS SEQ 0061 
| 
| DQSTAT 001510 9234 1065* 1068 1110 2252 2264 2279 2297 
| past 001402 8884 
/ pQSTO1 001406 8908 
| DASTO2 001412 892m 
DASTO3 001416 8944 
DASTO4 001422 R964 
DASTOS 001426 8984 
ST 001432 9004 
DASTO7 001436 902# 
DQAST1O0 001442 9044 
DQST11 001446 9064 
DaST12 001452 9084 
DQST13 001456 9104 
DQST14 001462 912m 
DQST15 001466 9144 
DQAST16. 001472 916m 
DQAST17 001476 9184 
DQaTCSR 001 8764 1078* 1079* 1080 1641* 1642 1701 1938* 1939 1978* 2183 2336* 23518 
DQTLVL 001356 8734 1074* 1075* 
DOTVEC 601354 8724 1072* 1073* 1074 
DSWR = 177570 573# = (946 
DT1 17230 2915 29614 
DT2 017242 2951 29664 
DT3 017254 2948 2954 29714 
EMO 016174 2910 29614 
EM) 016314 2913 29614 
=M2 016361 2916 2919 2922 2925 2928 2931 2934 2937 2940 29614 
EMS 016403 2946 29614 
EMG 016462 2949 29614 
EMS 016506 2952 29614 
EM6 16533 2955 29614 
ENABLE 011620 1500 1547 1689 1723 1737 1768 1782 1899-2173 2330 23334 
ERR 013030 2068*  2084* 2100" 2177 23834 2973 
ERRCNT 001232 794 941% 24645 2756* 
ERRFLG 001312 8254 938% 2399* 2462"  2707* 2720 2734% 27918 
ERRMSG 014632 2717" = 2735 27384 
ERTABO 014750 2731 2765M 
EXITER 014702 2750 2755a 
EXT.UP 011236 1631 1678 1732 1777 2272m 
FUNCT. 011022 2064* 2080*  2096*  2239H 2314 
GDCHAR 013044 1116* 1126* 1175% 1192% 1439* 2389" 2963 2968 
HALTS 014662 2703 2749M 
HILIM 014054 2547 2577 2595# 
ICOUNT 001222 ? 2460 2464* 
NBUF 015652 2511 2553 29014 
INIFLG 001310 82 962 965* 
INSTER= 104404 8444 2572 
INSTR = 104403 8424 1022 2821 
INSTR2 013640 2522 25374 
JUMBIT= 040000 6134 730 2264 2297 
LIGHTS 001202 779 =: Sa? 956* 2419 
LIMITS 014002 2563 2577# 
LOBITS 014060 2549* 2581 25974 2598 
LOCK 001220 7894 1109* 11738 1630" 1677* 1731" 17768 2476 
LOGICA 013162 651 24 26M 
LOKFLG 001313 826m 





K 5 


| CZDQF  MACY11 30(1046) OS5S=MAY-81 14:18 PAGE 64 
CZDQFF P11 O5S=MAY=81 09:27 CROSS REFERENCE TABLE <= USER SYMBOLS SEQ 0062 
LOLIM 014052 2546* 2579 25944 
LPCNT 001224 7918 26459 2460 2463* 
LSTERR 001234 7954 942% 2398* 2704 2706* 2792* 
MCRLF 015240 2519 2535 2627 2733 2827 28404 
MCSRX 015461 2404 28674 
MDATA 015756 2655 2666 29054 
MEMCLR= 104413 8584 1114 1435 2241 2273 2794 
MEPASS 015300 2402 28464 
MERRPC 015605 2729 28864 
MERRX 015506 2416 28734 
MERR2 015325 761 1058 28504 
MERR3S 015374 990 28574 
MISC. = 000012 6314 2232 2235 
MLOCK 015432 1014 28634 
W 015533 983 28784 
MPASSX 015475 2412 28714 
MPFAIL 015242 2788 28414 
234 2532 28394 
015322 1032 28494 
MSG13. C16224 29614 
MSTCLR= 104412 8564 2793 
MTITLE 000 7704 
MTSTN 015517 2725 28754 
MTSTPC 015420 1023 28614 
MVECX 015467 2408 28694 
NEWENA 011674 1592 1838 2037 23484 
NEXT 001216 7884 1038* 1093 1108* 1172" 1234" 1247* 1260* 1273* 1286* 1299* 1312* 1325* 


1338* 1351" «= 1364" = 1377" = 1390* «= 1403" = 1416" 1429% 1484" 1525* 1567* 1624* 1669* 
1716* i 1806* 1870" 1920* 1959*  2007*  2063* 2079* 2095* 2136* 2465 2761 


ODDBI T= 6144 32 
T 015174 2808 2810 2812 2816 28284 

PARAM = 104405 84 1024 2822 
PARAM1 013706 25524 2573 
PARERR 013762 2555 2557 2559 25684 2578 2580 2582 
PARTI 014044 2571 25914 
PASCNT 1230 7934 937* 2400* 2419 2442 
PFTAB 015052 2790 27964 
POL Y 013032 2066* 2082*  2098* 2316 23844 
POLY. = 7 6364 
POPRO = 012 5834 2754 
POP1SP= 005726 5814 
POP2SP= 022626 5854 
PS = 177776 5754 72* 932* 1007* 

= 010046 5824 2751 
PUSH1S= 005746 5804 
PUSH2S= 024646 5844 
RDSW 015060 2484 2533 2570 28044  2818*  2828* 
RESREG 014660 2745 27484 
RESTAR 014776 2775 27814 
RESTRT 013172 2421 2424 24314 
RESOS = 104407 8504 2748 

001214 anes 944* 1027 1031* 1033 1037 1112* 1113 2432* 2465" 2466 2761* 2763 
001304 8184 1041* 1044 1049* 1055* 1062 
RUNCNT 001306 8194 1042 1057* 10538 | 
RUNFLG 001302 8174 939* 1039 1043* 
~ 


po rr 


L 5 


 CZDQF  MACY11 30(1046) O5S=MAY=81 14:18 PAGE 65 
| CZ2DOFF.P11 05=MAY=81 09:27 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0063 
| RXBA.P= 000000 6208 
 RXBA.S= 000004 6248 
| RXBUFF 012216 1122 1180 1442 1585 1589 1724 1738 1769 1783 #1831 1835 1981 1994 
| 2030 3 3=—s-_- 2034 2047 =. 2051 2194 2248 2286 2375# 
RxwC.P= 000001 6214 
RxwC.S= 000005 6254 
Rx.BCC= 000015 6344 
SAVACT 001502 754% 920 987 
SAVNUM 001276 747% 815 935% 2620* 2422+ 
SAVPC =: 001274 8144 2602" 2767 
SAVRO 001256 8074 2611* 2616 
SAVR1 001260 8084 26108 2617 
SAVR2 001262 8094 2609* 2618 
SAVR3 = 001264 8104  2608* 261 
SAVR4 001266 8114  2607* 2620 
SAVRS 001270 812% 2606* 2621 
SAVSP 001272 8134 
SAVOS = 104406 8484 2708 
SC = 104400 ” a a + rs Pr. re, , k  ) eB 
1354 1367. 1380.~—Sfs«a1393°)=~=C*é=‘z406)=) 1419) 1432 = 1509s: 1551 1611 1639 1687 #1748 
1790 1857 411908 .1949 1996 2053 2071 2087 + +=2103~Ss 2208 
SCOP1 = 104401 8384 1154 1213. 1637,—S—«*1685~—Ssté«~i2:7K 
SEQ. = 000014 6334 
SET.UP 011024 1486 1526 1568 1625 1670 1717 #421762 1807 #1871 1921 1960 2008 2137 
SPACNT= 014377 2638* 2659  2662* 26784 
STACK = 001200 5764 933 1008 2762 #2783 
STFLG 001311 24H = - 936 
$v0S5. —- 014070 26064 
SwR 001200 7784 946% 951 955* 966 969 980 987 993 1012 1020 2450 2457 
2474 2486 2697 2702 2749 2757 #2759 2809 
+ | SwWREG 000176 6904 955 966 2809 2825 2832 
SWREGC 015202 2820 28304 
SwoO = 1 5 56a 
SwO1 = 000002 555¢ 1020 
SwO2 = 554a 
SwO3 = 000010 5534 
sw04 = 000020 5524 
swOS = 000040 5514 
Sw06 = 000100 5504 
swo8 = 000400 5494 2757 
sw09 = 001000 5484 2474 
Sw10 = 002000 5474 2759 
SW11 = 004000 5464 24657 
sw12 = 010000 5454 2486 2697 
Sw13 = 020000 5444 2702 
Sw14 = 040000 5434 
Sw15 = 100000 542m 
SYNBIT= 100000 6154 = 712 
012012 2254* 2256 2257 2372# 
= 000011 6304 
015714 1134*  1135* 1137* 1138 11468% 1149* 1150 1191* 1193* 1197* 1207* 1208* 1209 
152% 1653* 1455* 1456 1466* 1467* 1468 2634 2642 2669% 2784% 2785* 2903# 
001244 669* 670" 802 973% 974 978* 1196* 1198* 1199 2894 
001246 8034 974% 2896 


001250 8044 2634* 2669 





mM 5 
CZD0F MACYT1 30(1046 


) O5S-MAY-81 14:18 PAGE 66 
CZDQFF P11 OS=MAY=81 09:27 


CROSS REFERENCE TABLE <= USER SYMBOLS SEQ 0064 
TEMP4 001252 8054 
| TEMPS 001254 
TKCSR 001204 780 2453 2513 2811 
TKDBR 001206 7818 245 2515 2523 2813 
TLAST = 010214 1026 2392m 
TPCSR 001210 7B2H 24 2493 2496 2524 2699 
TPDBR 001212 7834 2492e 2495" 2498* 2523* 27018 
| TRPOK 014414 26884 
TSTNO 001226 7924 943% = 1036" = =1092* 1107* 1171* 1246* 1259* 1272% 1285* 1298* 1311* 


1233* 
1324% 1337% 1350" 1363" 1376* 1389% 1402" 1415" 1428* 1483* 1524* 1566* 1623* 
oe 1715* 1760* 1805* 1869* 1919% 1958*  2006* 2062" 2078* 2094* 2135* 2770 


TST1 002254 1025 1031 10364 2432 2433 

TST1O0 003624 1260 12724 

TSTil 003654 1273 12854 

TST12 003704 1286 12984 

TST13 003734 1299 13114 

TST14 003764 1312 13244 

TST15 004014 1325 13374 

TST16 004044 1338 13504 

TST17 004074 1351 13634 

TST2 002644 1037 1038 10924 

TST20 004124 1364 13764 

TST21 004154 1377 13894 

TST22 004204 1390 14024 ' 

TST23 004234 1403 14154 

TST24 0042 1416 14284 

TST25 004562 1429 14834 

TST26 0047 1484 15244 

TST27 005072 1525 15664 

TST3 002 1093 11074 

TST30 §©=—.005350 1567 16234 

TST31 005532 1624 16684 

TST32 4 ©005726 1669 17154 

TST33 ©0061 1716 17604 

TST34 006260 1761 18054 

TST35 1806 18694 

TST36 =: 007054 1870 19194 

TST37 =. 0072 1920 19584 

TST4 003214 1108 11714 

TST40 §=—.00 7470 1959 20 

TST41 010002 2 20624 

TST42 010060 2063 20784 

TST43 §=.010136 2079 20944 

TST44 010214 2095 21354 2392 

TST45 = weeaee 2136 

TST5 003514 1172 12334 

TST6 003544 1234 12464 

TST7 003574 1247 12594 

TTST 013246 1015* 1016* 1018* 1019* 24514 

TXBA.P= 000002 6224 

TXBA.S= 000006 6264 

TXBUFF 012014 1495 1542 1575 1577 1579 1628* 1673 1720 1765 1820 1822 1824 18278 
1890* 1891* 1892s 1894 1931 1936* 1937* 1971* 1972 1975 2017 2019 2021" 
2022* 2150 2161 2170 2243 2321 23734 


TxWC.P= 000003 6234 





OS=MAY=81 


f 
| 
| CZDQF MACY11 30(1046) 
| CZDQFF P11 05=MAY=81 09:27 
| TxwC.S= 000007 6278 
| TX.BCC= 000016 6354 
| TX.MUX= 900013 6328 
TYPDAT 014646 2723 
TYPE = 104402 760 
2415 
2817 
TYPMSG 014570 2721 
VE CMAP 56 6624 
WRDCNT 014374 2636* 
WRKO.F 014634 2736 
XBX 014462 2698 
xCSR 3206 2406 
KERR 013230 2418 
KHEAD 015612 972 
XPASS - 013222 2414 
XPOLY 3034 2065* 
XRXBUF 012626 23814 
XSTATQ 015640 977 
XSYNC C12420 2281* 
XSYNC2 012422 2284* 
XTSTIN 014756 2727 
XTXBUF 012424 1634* 
XVEC 013214 2410 
x. ABF 564 1676 
X.ABG 005446 1629 
$CNTG 015210 2817 
ads 14 
1260 
13394 
1429 
17174 
2063 
SMNEW 015223 2821 
SMSWR = 0015214 2819 
= 000044 14 
1257 
13394 
1426 
17174 
2060 
$y = (00016 14 
8584 
. = 017262 6404 
726 
8934 
9064 
9194 
1210 
1702 
1992 
2203 
28384 
BEGIN 002116 10074 
~CKSWR 015062 861 
-CNTLU 015136 863 


14:18 PAGE 67 


N 5 


CROSS REFERENCE TABLE == USER SYMBOLS 


27444 

964 972 
2519 2531 
2827 

26764 

27024 

2097* 2320 
2290 23774 


16894 
16404 
10394 1093 
1273 12744 
13524 1364 
1484 14854 
17624 1806 
2079 20804 
10394 1090 
270 12744 
13524 1361 
1481 14854 
17624 1803 
76 20804 
836 8384 
8624 8644 
6434 6504 
764 7694 
8954 8 
9084 9094 
9214 9228 
1470 1503 
1741 1772 
2069 2085 
2265 2278 
2902" = =29044 


982 
2535 


23854 


1736* 


989 
2626 


1780* 


1014 
2665 


1781* 


1032 
2724 


2275 


1057 
2728 


23794 


2401 
2732 


2403 
2737 


2407 
2742 


SEQ 0065 


2411 
2787 
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C7DQF MACY11 30(1046) O5S-MAY-81 14:18 PAGE 68 

CZDOFF P11 OS=MAY=81 09:27 CROSS REFERENCE TABLE == USER SYMBOLS 
-CNVRT 014160 855 26284 

-CONVR 014154 853 26268 

-EOP 130590 1112 21356 23984 

-ERRTA 016020 2716 29078 

«HLT 44 oe 26 


ee a at at at td 


25078 Soite 2813* 2814" 2815 
PAR 

-PFAIL 014764 tt 934 27748 2782 

~START 001512 695 9324 944 

-SYNC €12010 226) 2294 23714 


| c 

er 3 

-INSTE 013614 84 25298 

-INSTG 013620 2528 25314 

-INSTR 013476 843 25054 

.INST1 013516 25098 2520 2536 

-MEMCL 010652 859 22114 

MS 013 

-MSTCL O 

-PARAM 013646 847 25434 
00 690 

. TYPE 013370 41 24814 


SEQ 0066 


sss 


CZDQF MACY11 30(1046 
CZ7DQFF.P11 OS=MAY=-8 
ND 18 8 2397 
DOF RNT 14 522 
HLT 5864 1147 
1693 1697 
1987 990 
2201 2204 
IDENT iF 
OR 14% 1034 
TESTA? la 
TESTB1 1” 
TESTC1 1a 
TESTDi ‘e 
TESTE) if” 
TESTF1 18 
TESTH1 4 
TESTH2 la 
$BE GSE 10884 2240 
SBEGIN 14 1004 
$SBUF FE 14 2898 
$CATCH 1a 639 
SCLRVE lf 969 
SCONVR a 2623 
EOP 14 2391 
SEXTSU 10884 2272 
$SGETFL a 
$GETPA 14 #1022 
$HE ADE 1a 522 
$SHLT 1% 2693 
SINSTR 1# 2502 
SINTNP a 
SMAINT 14 
$MSG 1% 2839 
$PARAM 14 2540 
SPFAIL 14 2771 
$SREG 14 2599 
$SCOPE 14 2446 
$SCOP1 14 2470 
SSETFL 1a 
SSETVE 14 641 
$SSTART la 924 
$SYMBO 14 539 
STRAPS a 827 
$STRPDE 1a 836 
STRPSR 14 2680 
$TSTN i 1034 
1361 1374 
1917 1956 
$TYPE 14 26478 
SVARIA la 768 
$xSCOP 10884 «+1153 
$yIPPY 10884 2056 
. ABS. 017262 000 


) OS5S=MAyY-81 

1 09:27 
1152 1206 
1700 1703 
1993 2046 
2343 2358 
838 840 
1090 1105 
1387 1400 
2004 2060 
1212 1636 
2072 2088 


C 6 


14:18 PAGE 70 


CROSS REFERENCE TABLE == MACRO NAMES 


1465 1471 1504 
1742 1773 1787 
2070 2086 2102 


844 846 848 


1231 1244 1257 
1426 1481 1522 
2092 2133 

1745 


1508 
1847 


2176 


550 
856 
179 


854 


1296 
1666 


856 


1309 
1713 


1647 


1944 


2189 


860 


1335 
1803 


86< 


1348 
1867 


5 | 


D 6 
c76aF MACY11 30(1046) O5=MAY-81 14:18 PAGE 7 
CoDOFF. P11 05=MAY=81 09:27 CROSS A EF ERENCE TABLE == MACRO NAMES 


ERRORS DETECTED: 0 
CZDOFF BIN. CZDQFF .LST/CRF/SOL/NL : TOC=CZDOXX.MAC, CZDQFF.P11 
RUN-TIME: 7 19 1 SECONDS 


RUN=TIME RATIO: 112/18=5.9 
CORE USED: 21K (42 PAGES) 


SEQ 0068 


